SH 2 12 > DM Einzelpreis: ÖS 90,—; sfr. 12,—; L. 10 000; ptas 750,—; hfl. 14,50 
’ 


1 SEITEN ' P 


Pr DAS BESTE AUS DEM 
au 70 000-MARK-WETTBEWERB 


Be 


DREI DUTZEND BEFEHLE NEU 


ZEICHENTRICK MIT Ei 
SPRITE-BASIC 


PPY 


(U O HYPER-COPY 
BACK-UP REKORD 
IN 100 SEKUNDEN 


FLOPPY-MASTER 


au | 


; % L 
1 u iR r De 
\ N Ube EG 


a MASCHINENSPRACHE 
E 7”. ENTWICKLUNGSSY 
a  EINZELSCHRITT $ 

79 SIMULATOR 
a SOUND 


u Ic 


4 I: MIT 120 BEFEHLEN 
2 664 MULTITASKIR 


I 


‚in der Tat: 


Die Schlacht ist geschlagen. 
Am 31. Januar ertönte der 
Schlußpfiff. Der größte Pro- 
grammierwettbewerb aller Zei- 
ten ist jetzt beendet. Wir riefen 
nach Programmen, die das 
Computern erleichtern, und 
das Echo war überwältigend: 
Software-Olympioniken aus 
zehn Nationen kämpften um 
300 ‚Preise. Basic-Bastler und 
Maschinen-Matadore schick- 
ten ihre besten Listings ins 
Rennen. 

Redaktionsbesu- 
chern bot sich ein seltsames 
Bild. Oft waren wir verschanzt 
hinter Programmbergen und 
Diskettenstapeln. Stunde um 
Stunde krochen wir Flußdia- 
gramme entlang, folgten ver- 
schlungenen Assemblerpfa- 
den, stiegen hinab in Subrouti- 
nen und eroberten Menügip- 
fel. Im Software-Schlaraffen- 
land verging kein Tag ohne 
überraschende Funde. 

Viele Listings können sich mit 
Profi-Programmen messen und 
übertreffen sie sogar. RUN-Le- 
ser zeigen: Sie haben ihre 
Rechner im Griff. Dennoch — 
Gut Ding muß Weile haben. 
„Hilfe, ich werde nicht fertig!”, 
klagten viele Nachzügler. Da- 
her verschoben wir den Ein- 
sendeschluß auf Ende Januar. 
Unermüdliche Softwerker leg- 
ten schnell noch letzte Hand an 
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ihr Programm und schickten 
uns Updates und erweiterte 
Versionen. 
Wo das alles abdrucken? In 
der RUN hätten wir noch die Ti- 
telseite mit Listings bepflastern 
müssen. Also: ein Sonderheft 
muß her! Hier ist nun die Es- 
senz aus 30 Mannjahren und 
einigen Frauwochen Program- 
mierarbeit. Wir präsentieren 
die Elite aus dem „Gröpro- 
waz". Es sind 
die Größten: 
— User-Basic mit 120 neuen 
Befehlen 


— Floppymaster, ein neues 
Disktool mit allen Schikanen 
die Schnellsten: 


— Blitzcopy kopiert komplette 
Disketten in sage und 
schreibe 100 Sekunden 

die Besten: 

— Hires-Basic erzeugt Grafik, 
wie sie noch keiner gese- 


el 


Redakteur 


ORLD,COM 


Weitere 
werden in der jetzt parallel er- 
scheinenden und in den kom- 
menden Ausgaben RUN veröf- 
fentlicht. 

Keine Medaille gewonnen? 
Nicht verzagen! Der Beste ist 
oft nur vorne: Das Basic Con- 
struction Set hat es zwar bis auf 
die Titelseite gebracht, konnte 
aber nicht in den Innenteil vor- 
dringen (die Copyright-Ver- 
handlungen gehen weiter). 


hen hat (Zweifler werfen ei- 
nen Blick auf Seite 14) 
Sieger-Programme 


Wer noch Fragen zu den Pro- 


grammen hat, kann zur Sprech- 
stunde Freitag 16—18 Uhr in 


der Redaktion anrufen. 


Für nur 29,90 Mark (plus 3,— 
Mark Versandkosten) gibt es 
alle Programme fertig auf zwei 
RUN-o-thek-Disketten zu kau- 
fen. Was muß man tun? 

Erste Möglichkeit: Beiliegende 
Zahlkarte herausnehmen und 
den Einzahlungsbeleg an die 
RUN-o-thek schicken. 

Zweite Möglichkeit: Verrech- 
nungsscheck über den Ge- 
samtbetrag in einen Briefum- 
schlag stecken und ab geht die 
Post an: 

RUN-o-thek 

Postfach 40 04 29, 

D-8000 München 40 


Terug 
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c64 MIATITASKING 
€128 BASIC-ERWEITERUNG 


Der "Gröprowaz” 
ist vorbei. Das Re- 


sultat: Ein Heft vol- 
ler Siegerprogram- 
me. 180 Seiten Soft- 
ware vom Feinsten. 


SIEGER PROGRAM 


Editorial 


KORREKTOREN 


Abtippfehler gehören der Vergangenheit an. Mit 
dem Superkorrektor für C64-Basic-Programme, 
dem Hexdump-Basiclader und dem Checker für 
Maschinenprogramme gibt's keinen Fehlerfrust 
mehr. 


6—12 


GRAFIK 
Voll im Bild mit Hires Basic 


Das ist Grafik total! Mit 40 neuen Befehlen kann 
man alles machen, was der VIC hergibt. Grafiken 
können ganz oder nur teilweise vergrößert und 
verkleinert werden. Mit Verzerrungseffekten 
wird der starre Bildschirm zum dehnbaren Gum- 
mi. Und ganz nebenbei erledigt Hires Basic noch 
alles andere, was man von einem guten Grafik- 
tool erwartet. 


14—27 


Hires-Basic verschiebt Bildschirmausschnitte S. 14 
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Zeichentrick mit VIC 


Mit einer simplen Sprite-Erweiterung kann man 
niemand mehr hinter dem Ofen hervorlocken. 
Bei Sprite-Basic werden aber selbst abgebrühte 
Profis hellhörig: Raffinierte Befehle lassen Sprite- 
bewegung, Animation, Kollisionsabfrage und 
Sounderzeugung gleichzeitig ablaufen. Und ne- 
benher wird auch noch das Hauptprogramm ab- 
gearbeitet! 


Profi-Paket für Grafik-Power 


GRAFIX stattet den C64 mit Grafik-Power aus, 
wie es sie sonst nur auf wesentlich größeren 
Rechnern gibt. Optimale Algorithmen sorgen für 
blitzschnelles Zeichnen von Linien und Kreisen. 
Eine Sensation sind die Befehle für Splines. Kom- 
plexe Kurven lassen sich jetzt so einfach 
erstellen wie auf einer CAD-Maschine. 


28—35 


36—49 


SOUND 
Musik nonstop 


Der Soundtrack zum eigenen Programm ist kein 
Wunschtraum mehr: Musik-Basic erzeugt drei- 
stimmige Begleitlieder. Das Programm ist ein 
kombinierter Compiler-Interpreter. Das Beson- 
dere daran: Musikstücke lassen sich ganz einfach 
in andere Basic-Programme einbauen — auch 
nachträglich. 


FLOPPY 


Mit Floppymaster zum 
Diskettenmeister 


Floppymaster ist ein dreiteiliges System: Disket- 
tenmonitor, -doktor und -editor. Es gestattet den 
direkten Zugriff auf alle wichtigen Teile der Dis- 
kette (Sektoren, Directory, BAM) sowie auf das 
komplette Floppy-Betriebssystem (DOS, Puffer, 
RAM). Im Floppyspeicher können sogar Maschi- 
nenprogramme editiert und gestartet werden. 


Formatieren in elf Sekunden 


Disketten im Rohzustand sind nutzlose Scheiben. 
Erst das Formatieren bringt sie in Form. Das dau- 
ert 90 Sekunden, wenn man den Floppy-Befehl 
„N" benutzt. „Speed Format“ kann's achtmal 
schneller. Auch wird das Rattern, das über kurz 
oder lang zu einer Dejustage des Schreib-Lese- 
kopfes führt, durch ein kurzes, schonendes Klik- 
ken ersetzt. 


59—79 


80—84 
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Grafix liefert Befehle für Splines S. 36 


Blitzcopy — 
Backup in 100 Sekunden 


Blitzcopy setzt neue Maßstäbe: Volle Disketten 
werden in 100 Sekunden kopiert — inklusive 
Verify. Turbo-Routinen treiben die Floppy an 
ihre Leistungsgrenze. Auf die nötige Datensicher- 
heit wird dabei nicht verzichtet: Jeder Schreib- 
vorgang wird mit einem Verify überprüft. 


a — 


TOOL 


Werkzeugkasten für Programm- 
bastler 


„LAUBTOOLS" ersparen viel Plackerei. Sie stel- 
len dem Programmierer einen Werkzeugkasten 
voller nützlicher Hilfsfunktionen zur Verfügung. 
Basic- und Maschinenprogramme lassen sich mit 
dem Komfort eines Textverarbeitungssystems er- 
stellen. Die Floppy wird mit wenigen Tastendrük- 
ken gebändigt. Testbefehle helfen beim Aufspü- 
ren von Programmfehlern. Das fertige Endpro- 
dukt kann schließlich automatisch 

dokumentiert und komprimiert werden. 


Maschinensprache Schritt 
für Schritt 110—124 


Viele Computer-Hobbyisten trauen sich nicht an 
Assembler heran. Unter anderem, weil es keine 
Fehlermeldungen im gewohnten Basicstil gibt. Im 
Gegenteil: Meist verabschiedet sich der Rechner 
sang- und klanglos. Deshalb ist Fehlersuche in 
Maschinenprogrammen kein Zuckerschlecken. 
Ein Einzelschritt-Simulator ist dabei 
unverzichtbares Hilfsmittel. 


—— 


BASIC-ERWEITERUNG 
Basic hoch drei 125—140 


Basic-Power wie noch nie! Die Allround-Erweite- 
rung „User-Basic" möbelt den C64 auf, daß er 
nicht wiederzuerkennen ist: 120 neue Befehle 
verdreifachen den Wortschatz des C64. Alles, 
was ein Rechner können soll, wird abgedeckt. 
Die Befehle werden platzsparend als 
2-Byte-Token im Programm gespeichert und 
lassen sich wie bisher bei der Eingabe abkürzen. 


Masken mit Pfiff 141—143 


Eigene Programme mit pfiffigen Eingabemasken 
zu versehen, kostet meist viel Zeit. Der „Block- 
marker" verleiht selbstgebräuten Programmen 
ein professionelles Styling. 


85—97 


98—109 


Mit Splines sind komplizierte Kurven ein Kinderspiel S. 36 
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Unbeschränkte 
Funktionseingabe 


Funktionen sind täglich Brot für jeden, der sich 
mit Mathematik befaßt. Der Computer ist-da sehr 
nützlich. Dem Commodore-Basic muß man aller- 
dings ein bißchen nachhelfen: Eine kleine Routi- 
ne ermöglicht das dynamische Redefinieren von 
Funktionen. Das erleichtert die Programmierung 
enorm. 


Basic mit großen Möglichkeiten 147-152 


MakroBasic macht aus dem betagten Commodo- 
re-Basic eine professionelle Programmierspra- 
che. Das Erstellen von Profi-Software zum Eigen- 
bedarf wird zum Vergnügen. Mit Befehlen wie 
PRINTUSING, CGET und ELSE ist man jedem 
Basicproblem gewachsen. 


144—145 


Aus eins mach zwei 153—158 


Wer versucht, zwei Dinge auf einmal zu erledi- 
gen, gerät schnell durcheinander. Nicht so der 
064: Mit „MACH 2" können zwei Programme 
gleichzeitig laufen. Es verdoppelt den Rechner 
durch eine Basic- und Betriebssystemerweite- 
rung. Multitasking, sonst Privileg größerer Syste- 
me, auf dem C64! 


MASCHINENSPRACHE 


MES — Maschinensprache- 
Entwicklungssystem 159—176 


Maschinensprache gilt vielen als Königin der Pro- 
grammiersprachen. Damit die ersten Gehversu- 
che „in Maschine“ nicht mit einer Bauchlandung 
enden, braucht man einige Hilfsmittel. „MES" 
(Maschinensprache-Entwicklungssystem) bietet 
die komplette Ausrüstung: Monitor, Assembler 
und Reassembler. 
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c128 
Findiges Basic 177—178 


Der C 128 ist mit einem opulenten Basic ausgestat- 
tet. Satte 140 Befehle werden geboten. Zum Aus- 
testen von Programmen stehen viele nützliche 
Toolkit-Funktionen bereit. Ein Kommando sucht 
man vergeblich: den FIND-Befehl. Hier wird die 
Lücke geschlossen. Die neue Testhilfe spürt Zei- 
chenketten und Basic-Befehlswörter auf und listet 
alle Fundstellen. 
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Blitzcopy bietet Kopierservice im Schnellverfahren S. 85 
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Eintippen 
ohne Fehler 


Min RUN werden zwei Arten von 
4 Programmen veröffentlicht: Basic- 
wi gramme. Sie werden auf verschie- 
(dene Weise eingegeben. 

Basic-Programme können direkt 
nach dem Einschalten eingetippt 
werden. Die Sprache Basic ist 
nämlich im Computer fest einge- 
baut. Um ein Programm fehlerfrei 
einzugeben, verwendet man am 
besten den Superkorrektor. Nach 
jedem RETURN gibt er eine Prüf- 
summe aufdem Bildschirm aus. Sie % 


g gibt es zwei Möglichkeiten: Basic- 
a lader oder Hexdump. 

% Ein Basiclader ist ein Basic-Pro- 
gramm, das ein Maschinenpro- 
x gramm im Speicher unterbringt. 
0 Dazu werden die Zahlen, aus de- 
& nen das Maschinenprogramm be- 
x steht, aus DATA-Zeilen ausgele- 
x sen und mit dem POKE-Befehl in 
D den Speicher geschrieben. 

% Bei einem Hexdump liegen die 
* gleichen Zahlen in hexadezimaler 
x statt in dezimaler Form vor. Sie 
Ö werden mit einem speziellen Ein- 
% gabeprogramm, dem Checker 
* (Seite 8), im Speicher abgelegt. 


ge im Bereich ab $C000 (49152) 
ab. Listing 2 und 3 zeigen, welche 
Teile von Listing 1 jeweils wichtig 
sind, wenn man das Programm als 
Basiclader nutzt und wenn man es 
als Hexdump verwendet. 

Für den Basiclader ist alles von In- 
teresse außer den Angaben 
„C000" bis „C020" ganz links. Sie 
sind unbedingt wegzulassen. Üb 
rig bleiben fünf Basiczeilen mit 
den Nummern 10 bis 50, die Hex- 
zahlen als DATAs enthalten. Ab 
schließend ist noch der Teil mit 
den Nummern 60000-60090 in 
Listing ] einzugeben. Er liest die 
DATAs und poket sie in den Spei- 


“ Beide Darstellungsformen sind 
e gleichwertig. Der Basiclader hat 
“ den Vorteil, daß er kein eigenes 
e“ Eingabeprogramm benötigt. Der 
x Hexdump ist dafür schneller ein- 
u zugeben. Bisher wurden Maschi- 
oi nenprogramme in RUN jeweils in 
unse ” Seite 8 abgedruckt, der für den & beiden Formen abgedruckt. Der 
en C16/116/Plus4 auf Seite 12. Wer = Leser konnte sich so die Eingabe- 
nn: en das Risiko von Fehlern auf sich 5 methode aussuchen, die ihm am 
en nehmen möchte, kann Basic- Pro-% = meisten zusagte. Nachteil dieses 
a gramme auch ohne Korrektor ein- ı De » Verfahrens: Für dieselbe Informa- ;« 
geben. Die abgedruckten Prüf- “tion wurde der doppelte Platz be-* den. Einzugeben sind dann nur at 
'summen sind dann bedeutungs- # ® nötigt. “« die Hexzahlen. Es fallen also die.“ 
5 Jetzt werden Maschinenprogram- . Basiczeilennummer, das Ban 


cher. Dieser Programmteil ist bis 2 
auf Zeile 60000 bei jedem Hex- 0) 
dump-Basiclader identisch und 

mit Prüfsummen für den Korrektor 
versehen. Bei den DATA-Zeilen Yomaanonn 
wurde darauf verzichtet, da ders ; 
“ Basiclader über ein eigenes Prüf 
” R system verfügt, das Eingabefehler . 
in , weitgehend verhindert. . 


A Bei Verwendung als Heaaunpin 
“muß der Checker benutzt wer-" 


muß mit der Prüfsumme hinter der % 
betreffenden Zeile im Listing ver- 
?% glichen werden. Stimmen die Zah- % 
% len nicht überein, so liegt ein Tipp- 
x fehler vor. 

“ Der Korrektor für den C64 ist auf % 


Ca 


Dasselbe ee en C000" bis „C020“ brauchen auch : Y 
$ die Muttersprache des ocıpı: einmal als Basiclader, ein- ‘«‘ nicht eingetippt zu werden, da sie‘ 


‚ters handelt, kann sie nicht direkt .» „mal als Hexdump betrachtet wer-*® “ "vom ‚Checker geliefert werden. +" 


Auch die 
.. . das diese Aufgabe besorgt. Hier SS un von 40 Bytes Län-® . 6000060090 entfallen. 


[2 

un C2228 18 DATA AS,00,8D0,AF,CF,8D,Bo,CF, AS PRUEFSUNMMENFEHLER":F=F+1 \" 5 
.. C208 E8 DATA 8D0,B1,CF,80,B4,CF,80,BS, DB 50039 GOSUB 68090:NEXT A:PRINT " 2267 he .. 
“. Co1® 38 DATA CF,85,5C,85,5D,A2,F8,8E, 46 CDOWNI”F”FEHLER"”: END . .. 
. c218 420 DATA B2,CF,08,68,80,B3,CF,20, ©C 50040 READ H$:G0SUB 60059: H-L* 2715 3 
.. co20 5®ß DATA 13,C2,00,00,00,00,00,008, 52 16: H5-NIDS CHS,2) an Er 
” 600088 FOR A-439152 TOD 49184 STEP 42086 6900859 L=ASC CHS+"X”)-4B8: IF L<® S198 .. 

B; 8:5=-®8:C=-8:FOR B-8 TO 7: OR L>22 THEN 60089 Ks: 

“ GOSUB 600940 689085698 IF L<18 THEN RETURN 19044 .. 

IE 690918 S-S+H+L-C: C=-5>255:5-255-5 5034 60078 L=-L-7:IF L>9 THEN RETURN 1334 DE 

. AND 255: POKE A+B,H+L:NEXT 600882 F$S="LRUSIEINGABEFEHLER”:L= 24508 BE 

SR B:GDOSUB 5909498 O:F=F+1 ." 

BER 60028 F$S="PRUEFSUMME OK”: IF S<> 5639 600880 PRINT "”ZEILE” PEEK (64)* 2726 DB 


H+L THEN F$S="CRUS) ES6+PEEK (63)FS: RETURN 


Listing 1: Beispiel für einen kombinierten Hexdump-Basiclader 


. nr 00.“ 
PauL Dur Dur Br Be 


. 18 DATA A9,00,80,AF,CF,80,B2,CF, AS [098 AS 088 BD AFCF BD BOCF AS 23Äj...t.r. 
5 20 DATA BD,B1,CF,80,B4,CF,8D,BS, DB C228 8D Bi CF 80 B4 CF 80 B5S DB 

30 DATA CF,85,5C,85,5D,A2,F8,BE, 46 Co1® CF 85 SC 85 SD r2 FB BE 46 

40 DAIA B2,CF,08,68,80,83,CF,20, oC C018 B2 CF 88 68 BD B3 CF 22 26 

58 DATA 13,C2,22,00,08,208,00,08, 52 [220 13 C2 88 22 20 28 08 oo 52 


Listing 2: Beim Basiclader entfallen die 


Listing 3: Beim Hexdump fallen Zeilennummern, 
Adressenangaben links 


“Data“ und Kommas weg 
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Addison-Wesley, 
Ihre Schnittstelle in die Computerwelt 


ee X. |. Boon, A. R. Th. Pelsmaeker, 
eueneligZ Professionelle Software für den C64 
ee Dieses Buch bietet Ihnen eine Sammlung von Pro- 
grammen für allgemeine mathematische Anwendun- 
gen bis hin zu statistischen und finanziellen Berech- 
nungen. Außerdem finden Sie Programme, die sich 
mit Textverarbeitung, sowie dem Entwerfen von Da- 
tenbeständen befassen. Eine erweiterte Version des 
bekannten Simulationsprogramms THTSIM, sowie in- 
teressante Assemblerprogramme sind ebenfalls ent- 
halten. Ein wichtiger Titel für jeden fortgeschrittenen C64-Anwender. 
ISBN 3-925118-01-2 229 Seiten DM 48,— 


A ADDISON-WESLEY 
AL Küppersgarten 21: 5300 Bonn 3 


Addison-Wesley, 
Ihre Schnittstelle in die Computerwelt 


H. Renko/S. Edwards, 
DAS GEHEIMNIS DES SCHLOSS ARENDARVON 
Ein Mikrowelt-Abenteuer für den 064 


Haben Sie Lust auf ein einzigartiges, mysteriöses Abenteuer? Mit diesem Buch haben 
Sie es gefunden. Ein Journalist verschwindet im entlegenen Schloß Arendarvon. Sie 
folgen seinen Spuren. Mit Hilfe von Plänen, Karten und Illustrationen sollen Sie dem 
Geheimnis auf die Spur kommen, Werden Sie es lösen können? Ihr Geschick, Ihr Mut 
und Ihre Vorstellungskraft sind gefordert. 

Keine Angst vor Eingabefehlern: das Programm kontrolliert sich selbst. Wen Sie nicht 
tippen wollen: eine Cassette mit allen Programmen ist ebenfalls erhältlich 


ISBN 3-925118-00-4 DM 29,80 


vv ADDISON-WESLEY VERLAG 
(DEUTSCHLAND) GmbH 


KÜPPERSGARTEN 21 - 5300 BONN 3 


Addison-Wesley, 
Ihre Schnittstelle in die Computerwelt 


Nok van Veen, Der Programmierkursus 
BASIC für den COMMODORE 64 

Dieses Buch ist für all diejenigen gedacht, die ler- 
nen möchten, wie man mit dem Commodore 64 
programmiert. Das Buch ist ein kompletter Basic- 
Programmierkurs mit vielen Befehlen 


BASIC >. 
commoboRE64 | und Übungsaufgaben, deren Antworten 


hinten im Buch angegeben sind. 
ISBN 3-925118-03-9 DM 54,— 


AA ADDISON-WESLEY 
AG Küppersgarten 21: 5300 Bonn 3 


„ax Zusatztastatur 
ySfür professionelles 
No Arbeiten 


RT Anbausatz im Commocdore-Design 
passend zu C 64. 


Technische Daten: 


®@ +/- Tasten 
N e große Return-Taste 
,@ bewährte CHERRY-Tasten (16 Mio. Betätig.) 
u © problemloser Anschluß 
ug DM 1 59 ee Inka NOS. u Versandpauschale 
3 ahlbar per Scheck o. Nachnahme 


Bei Bestellung Farbe und Rechnertyp angeben. 


00 


ı* 
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Seit Erfindung des Abakus hat es das nicht gegeben 


Schüler, Eltern, Lehrer - alle wollen nur eines 


v3 Sm Das intelligente 
Algebra- 
programm 
für C 64, SX 64, C 128 


Unterstützt den Mathematikunterricht an allen weiter- 
führenden Schulen von der Unterstufe bis zum Abitur 


64’er Magazin 12/85: ... AL| überzeugte in jeder Situation durch erstaun- 
liche Rechenfähigkeiten. 


Viele Stimmen, eine Melodie — die Presse zu ALi 


CHIP 4/85: Das Programm führt die Umwandlungen Schritt für Schritt auf 
dem Bildschirm vor, so wie es ein Lehrer üblicherweise an der Tafel tut. 
Berücksichtigt wird das komplette Handwerkszeug ... 

RUN 4/85: Da in jeder Zeile auf beiden Seiten des Gleichheitszeichens 
jeweils nur eine äquivalente Umformung stattfindet, bleibt der Rechen- 
gang für den Schüler durchschaubar .... 

Bei der Arbeit ..... haben die testenden Schüler dem Programm ALI den 
Vorzug gegeben.... Das hat nicht zuletzt damit zu tun, daß auf kleine 
Details wie z. B. die mathematische Schreibweise und spezielle Schüler- 
probleme viel Sorgfalt verwandt wurde .... 

ALI ist ein gelungenes Programm, bei dem ein guter Lernerfolg zu er- 
warten ist. (Mathepauker im Schülertest) 
HC 9/85: ... Das Programm wendet sich an alle Klassen des Gymnasiums. 
Es besticht durch selbständige, schrittweise Lösung der ihm gestellten 

Aufgaben. 

MICRO COMPUTER COLLEG 3/85: Und hier liegt der eigentliche Clou: 
Gleichgültig, ob die Aufgabe aus dem Demonstrationsmenü stammt 
oder unter Beachtung der Spielregeln selbst eingegeben wird, das Pro- 
gramm arbeitet geduldig Schritt für Schritt auf die Lösung des gestellten 
Problems hin ..... 

Bei intensivem Einsatz des Programms ist eine Aneignung der Algebrea- 
grundlagen wahrscheinlich unvermeidbar .... (Nach-Hilfen) 


Ob es um Nachhilfe geht oder um das reine Vergnügen 


ALl ist fantastisches Lernspiel und Mathetool zugleich 
Vom Mathematikbuch einfach in den Rechner 
Und alles geht nachvollziehbar - Schritt für Schritt: 


ALI - rechnet verschachtelte Klammern aus En 


ALI - vereinfacht komplizierte Terme 

RLI - wendet die binomischen Formeln an 

ALI - spielt mit negativen Zahlen 

ALI - zerlegt in Faktoren 

ALI - erstellt Wertetabellen 

ALI - zeichnet Geraden und Parabeln 

RALI - löst lineare Gleichungen und Ungleichungen En 
ALI - löst Bruchgleichungen 


= 
ALI - löst quadratische Gleichungen KL gen 1 


ALI - bestimmt Nullstellen von Polynomen höheren Grades 
Das bewährte Programm arbeitet nun auch interaktiv 


Eine Anschaffung die sich bezahlt macht 


ALI bezieht auf Wunsch den Benutzer ein, fragt nach Umformungen 
und Zwischenergebnisssen, kontrolliert Lösungsvorschläge und kor- 
rigiert höflich, da wo es sein muß. So macht Mathe-Training Spaß. 


Die Zahl der begeisterten Anwender 
wächst von Tag zu Tag: 


Zuerst herzlichen Dank für die unglaublich schnelle Übersendung von 
ALI. Nachdem ich mich mit dem Programm vertraut gemacht habe, 
kannich nursagen:TOLL...Nebenbei:ich unterrichte Mathe- 
matik, Physik und Chemie. Herr O. B., 4614 Hilders 

Gestern habe ich ALI gekauft, heute fasste ich den 
Entscheid, Ihnen zu schreiben. Vor allem: Mein 
Kompliment für die ungeheure Arbeit, die 
Sie geleistet haben. Ich bin hell begei- 
stert- einerseits als Vater, anderer- 
seits als COMMODORE-Hobby- 
ist... . Mit freundlichen Grü- 

Ben aus der Schweiz 


HerrM.S.CH-8212 


we F 


Checker für 
Maschinen- 
programme 


Der Checker reduziert die Tippar- 
beit und weist während des Eintip- 
pens auf Fehler hin. Außerdem 
entfällt das langwierige Einlesen 
der Datas durch den Computer. 
Der Checker ist eine Art Textedi 
tor für Maschinenprogramme, der 
jede einzelne „Programmzeile 

(zu je 8 Byte) anhand einer mitein- 
zugebenden Prüfsumme auf Rich- 
tigkeit testet und sich bei Tippfeh 
lern akustisch bemerkbar macht. 


Anwendung 


Die Daten werden in hexadezima- 
ler Form eingegeben. Dazu ste- 
hen die Tasten 0-9 und A-F zur 
Verfügung. Zur Steuerung des 
Programms kommen noch folgen- % 
de Tasten dazu: 

"Bevor man Daten eingibt, 
„man mit Y die Startadresse einge- ® 
«ben, ab der das Programm einge-'. 
:lesen werden soll. Beim a 
‚wird dieser Wert dann als An-* 
fangsadresse genommen. 
—INST/DEL— 
«löscht ein einzelnes Zeichen oder 


‚fügt eines ein. 


löscht eine ganze Zeile und läßt 
« die Zeile zur Veränderung frei. 
De 
löscht ebenfalls eine Zeile, jedoch! 
«verbleibt keine Leerzeile, son-' 
dern der Rest des Programms:'- 
rutscht nach. 
Le 
kann eine Zeile einfügen; der Rest‘! 
des Programms rutscht eine Zeile :* 
‚nach unten. 


setzt ihn an den Zeilenanfang. 
—CSRS— 


‚sten gesteuert. 


das Programm wird auf Diskette = 
‚Text‘ eine Leerstelle befinden, % 
2 Punkt. 


möglich, wenn alle Leerstellen ®rechnete Prüfsumme mit der ein- 
entfernt wurden. 


wieder, um es zum Beispiel zu er- 
gänzen oder zu verändern. 

Eine Zeile wird mit RETURN in 
= den Speicher übernommen. Hier 


Wiindet auch der Prüfsummentest 
Ein Abspeichern ist erst &%statt. Stimmt die vom Computer er- 


Mgegebenen überein, ertönt ein 


Fortsetzung auf Seite 12 


RESTORE :FOR A=49152 TO 49629:POKE A,234:NEXT :PRINT 

F=B:READ A:Y=PEEK (63) +PEEK (64 )#256: IF A=Bd THEN 208 

READ B,C:FOR D=A TO B:READ AStIF LEN (A$)-2 THEN 98 

E=ASC (AS) -48-(7 AND AS>"@"): IF Asl"9" OR A$>"G" OR As>"ı" AND As 

"A" THEN 98 

AS=MIDS (A$,2)ıE=ERISE+ASC (AS) -48-(7 AND ASY"@") 

IF A${"8" OR A$S>"F" OR A$>"3" AND A$<”"’A" THEN 98 

F=F+E:POKE D,E:NEXT :IF F=C THEN 28 

PRINT "PRUEFSUMMENFEHLER: SOLL"C", 

PRINT "EINGABEFEHLER: "As$ıY=8 

Z=PEEK (63) +PEEK (64) 2256:A$=STR$ (Y)+STRS (-Z):IF Y=8 THEN A$=STR$ 

(z> 

PRINT "[DOWNILIST"AS"L2UP]*7:POKE 198,1:POKE 631,13:END 

PRINT "LDOWNJFERTIG.":PRINT *"[DOWNISOLL DAS MASCH INENPROGRAMM 

ABGESPE ICHERT 

INPUT "LUPIWERDENL2SPACESIJLSLEFTI"FAS: IF A$>"J”" THEN 388 

syYs 57812"@:49152 KORREKTOR" ,8:POKE 193,8:POKE 194,192:POKE 174,222 

POKE 175,193:5YS 62957:VERIFY "49152 KORREKTOR*",8,1 

AS="": INPUT "LDOWNIKORREKTOR AKTIVIEREN? JI3LEFTI"zAS: IF AS="J" 

syS 49152 

REM HAUPTPROGRAMM 

DATA 49187 ,49298 ‚2342 ,A9,AE ,‚A2,C0,80,82,83,8E,03,03,08,A8,1F,B3I,E2 

DATA C1,99,88,94,88,18,F? 

DATA 49323 ,49387,9136,4C ,31,EA,78,A9,2E ,A2,C0,8D,14,83,8E,15,83,58 

DATA A93,08,8D,E1,C1,20,68,A5,8C ,E1,C1,86,7A,84,7B,AC,E®,C1,F8,13,AB 
18,89,E1,C1,99,F1,C1,A9,A8,99,E1,C1,88,D®,F2,8C ,E8,C1,28,73,08 
AA,F®,D3,88,84 ,3A,90,55 
49467 ,49629, 19950 ,4C ‚96 ,A4 ,4C ,88 ,AF ‚20,6B,A9,208,79,45,94,88B,A® 
00,84,08,84,45,84,46,84,09,C8,BE,FF,81,F0,38,A5,08,38,0C,E8,28 
Fö,F2,E®,3A,F8,0C,E8,8F,F0,28,E8,22,098,02,493,80,09,01,85,88,8A 
A6,89,F0,86,0A,69,88,CA,D®,FA,18,65,45,85,45,99,02,E6,46,E6,83 
AS5,09,29,07,85,09,18,C2,46,08,998,21,A8,FF,8C,E®,C1,A2,14,28,53 
C1,C8,A9,BD,99,E2,C1,A9,BE,C8,939,E2,C1,C8,A2,45,28,B9,C1,A3,BB 
99,E2,C1,4C,A4,R4,84,08,B5,00,85,63,B5,81,85,62,A2,90,38,28,43 
BC ,28,DF ‚BD ‚A4 ,88,,AA,C8,8BD,80,01,F0,808,09,88,99,E2,C1,E8,D8,F2, 


"MOMENT ! 


IST"F:GOTO 188 


THEN 


REM EINY/AUSSCHALTER 

DATA 49152,49186,,5131,AD,03,83,C9,C8,D8,99,AD,DE,Ci,AE,DF,C1,4C,27 
DATA C8,8D,DF,C1,AD,82,83,8D,DE,C1,A9,ABd,A2,1F,3D,E2,C1,CA,18,FA 
REM E INGABES ICHERUNG 

DATA 49285 ‚49322 ,4626 ,AD,E1,C1,D8,21,8D,28,D8,8D,21,D0,4A5,DA,38,8E 
DATA 89,88 ,85,DA,A®,27,A93,20,993,28,04,88,18,FA,A6,D6,D8,05,A3,11,28, 
35,EB 

REM ENDE BZW. SIMON'S ANPASSUNG 

REM DUCH WEGLASSEN DES 1. KOMMAS: 

DATA ‚„49293,49295,702 ‚EA ,EA,EA, 


we | Superkorrektr für den C64: Alle Listings haben Prüfsummen am Ende jeder 
« Basiczeile. Sie helfen, Tippfehler zu vermeiden. Um die Prüfsummen verwen- 
ee “den zu können, muß vorher der Korrektor abgetippt und gestartet werden. 


“ en: dann erst mit dem Abtippen des neuen Programms beginnen. (Die Änga- 


«.ben in eckigen Klammern sind übersetzte Steuerzeichen. Also nicht 3LEFT ab- 


2 „tippen, sondern dreimal Cursor links!). Nach jedem RETURN erscheint die Prüf- } 
«"summe in der ersten Bildschirmzeile. Simon’s Basic: erst Simon laden und star- 

. “ten, dann angepaßten Korrektor (Zeile 4998 ff.) starten. Die Zeilen 200-240 (un- 

‘Der Cursor wird mit den Cursorta-.* ten) sind statt der entsprechenden der Diskversion einzugeben, wenn man mit 


Erreicht er den‘. 


an oder unteren Bildschirm-:. 
:rand, wird der Bildschirm ent-: 


‚sprechend gescrollt. 


"ein im Checker befindliches Pro-.:: 
gramm wird BER 


‚der Datasette arbeitet. 


PRINT "LDOWNIFERTIG. ":PRINT "LDOWNISOLL DAS MASCHINENPROGRAMM AUF 
KASSETTE 

INPUT "ABGESPEICHERT WERDENL2SPACESIJISLEFTI"FAS: IF AS<>"J" THEN 398 

sys 57812"49152 KORREKTOR”",1,1:POKE 193,8:POKE 194,192:POKE 174,222 
POKE 175,193:S5YS 62957:PRINT "BITTE DIE KASSETTE ZURUECKSPULEN UND 


INPUT "RETURN DRUECKEN"FAS:VERIFY "49152 KORREKTOR",1 


Champion, bleib am Ball! Nimm RUN, 
das unabhängige Home- 


Überblick. 


RUN spielt die besten Bälle: jede 
Menge Listings, Tests, Tips und 
Tricks. Wertvolle Informationen aus 
der ganzen Welt — mit Schwerpunkt 
C64, 128 und Amiga. 


RUN ist jeden Monat neu und aktuell. 
Beim Zeitschriftenhandel. Falls 
vergriffen, einfach an den Verlag 
schreiben. Wir schicken sofort ein 
kostenloses Probe-Exemplar. 


RUN. Für Champions, die es wissen 
ollen. 


N 
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Computermagazin. Denn RUN hat den 


| 


GOTO 19989989 

DATA 11,8,193,7,158,58,48,54,52, 
rrrr++169,,133,253,133,254 

DATA 32,248,15,32,138,9,169,63, 
141,138,2,169,24,141,5,228 

DATA 32,47,8,32,163,10,76,38,8, 
32,39,18,169,,133,198,165,1983 
DATA 249,252,32,39,19,173,119,2, 
96,169,,141,32,208,169,14 

DATA 141,33,208,169,,162,216, 
132,27,132,31,134,28,134,32,169 
DATA 4,133,30,132,29,169,,145, 
@27,169,168,145,29,298 ,208 ,245 
DATA 239,28,239,30 ,232 ,224,220, 
208 ,236,162,23,169,85,169,6 

DATA 145,31,209,145,31,299,200, 
192,198,144 ,243,290 ,288,169 

DATA 6,145,31,288,145,31,165,31, 
24,185,48,133,31,144,2,239 

DATA 32,202,2088,218,168,5,162, 
48,169,176,153,,4,138,9,128 

DATA 153,1,4,208,208,208 ,232, 
224 ,56,2098 ,237,162,6,189,238 
DATA 8,153,,4,290,202 ,2088,248, 
36,1698,38,169,4,132,27,133,28 
DATA 169,23,133,2,165,97,133,25, 
165,98,133,26 ,32,245,8,165 

DATA 25,24,105,8,133,25,144,2, 
e38,26,1685,27,24,185,7,133,27 
DATA 144,2,238,28,193,2,298,227, 
96,191,149,147,139,1368,131 

DATA 165,253,24,191,25,72,165, 
254 ,181,26,32,1902,9,194 ,32,182 
DATA 9,32,131,9,165,25,133,29, 
165,26,24,185,64,133,38,165 

DATA 26,133,31,165,25,19,33,31, 
18,38,31,169,68,133,32,165 

DATA 25,74,74,74,41,7,168,185, 
152,3,169,,49,31,248,34,168 

DATA ‚132,13,177,29,32,182,93,32, 
131,9,164,13,290,132,8,2083 

DATA 239,32,42,11,32,131,9,32, 
131,9,32,182,9,76,181,9,162 

DATA 28,169,,169,169,145,27,32, 
131,9,292 ,2088 ‚244 ‚936 ,72,74 

DATA 74,74,74,32,116,9,1984,41, 
15,76,116,93,24,185,248,144,2 
DATA 105,6,195,1868,41,191,1698,, 
145,27 ,230 ,27,208 ,,2,230 ,28 

DATA 96,169,15,141,24,212,32,48, 
18,32,65,8,76,189,8,128,64 

DATA 32,16,8,4,2,1,169,88,160,4, 
133,29,132,39,162,22,1698,39 

DATA 132,22,169,79,133,31,164, 
31,177,29,164,32,145,29,198 
DATA 31,198,32,16,242,165,29,24, 
105,48,133,29,144,2,230,30 

DATA 202 ,208,229,169,192,133,27, 
169,7,133,28,165,937,24,185 

DATA 176,133,25,165,98,185,,133, 
26 ,,76,245,8,169,152,1608,7 

DATA 133,29,132,30,162,23,169, 
39,133,31,169,79,133,32,164 

DATA 31,177,29,164,32,.145,29, 
198,32,198,31,16,242,165,29,568 
DATA 233,48,133,29,176,2,198,30, 
202,208 ,220,169,98,133,27 : 
DATA 169,4,133,28,165,97,133,25 
165,98,133,26,768,245,8,1853 

DATA 993,177.1981,73,5,145,191,98, 


a ee re vet en en 08 ES een erg 
. .. 
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169.,132,97,133,33,169,,133 
DATA 99,133,189,169,95,133,181, 
169,216,133,1902,96,198,109 

DATA 48,12,165,101,56,233,49, 
133,181,176,2,198,102,96 ,230 
DATA 1908,165,97,56,233,8,133,97, 
176,11,198,98,186, a 
DATA 97,153,98,96,76,230,9,239, 
188,165,1998, BI ‚es.Bah 1 
DATA 191,24.195,49,133,101,144, 
2,230,182,96,198,1989,165,97 
DATA 24,105,8,133,937,144 ,2,239, 
9398,165,938,291,63,298,11,165 
DATA 97,201 ,8,208.5,169,,133,97, 
96,76,169,9,201,17,208,3,76 
DATA 118,19,201,145,208,3,76,69, 
18,201 ,29,208,3,76,184,11 

DATA 201,157,208,3,76,58,11,201, 
13,288,3,76,23,12,201,43,144 
DATA 15,291,58,144,3,201,65,144, 
7,201,71,176,3,76,152,11,201 
DATA 19,208,3,76,155,12,201 ,147, 
288,3,78,149,12,291 ,20 ,203 

DATA 3,76,230,12,201,148,288,3, 
76,191,12,201,72,203,6,32,48 
DATA 18,76,189,3,201,73,208,3, 
76,17,13,2801,75,288,3,76,133 
DATA 13,201 ,83,2988,3,76,13,16, 
281 ,76,208,3,76,121,15,2801,393 
DATA 208,3,76,194,16,291 ,390,202, 
3,76,178,16,936,162,3,1608, 

DATA 24,169,,113,29,73,255,290, 
202 ,208,.248,96,193,39,165,393 
DATA 16,3,239,99,95 ,281 .2,240, 
243,201,5,249,239,281,3,248 
DATA 235,291,11,248 ,231 ,201 ,14, 
248 ,227,2081,17,240 ‚223 ‚2a01 

DATA 28,248 ,213,201 ,25,208,223, 
169,22,133,939,968 ,239,99, 165 

DATA 99,291 ,28,208,3,198,99,96, 
281,2,2498,241,201,5,240 ,237 

DATA 281,3,249,233,291,11,240, 
229,281,14,248 ,225,2081,17,248 
DATA 221,201 ,28,249 ,217,201,23, 
283,175,169,26,133,99,368 ‚72 

DATA 32,168,12,184,41,63,9,128, 
164,99,145,23,76,184,11,1608 

DATA ‚177,27,41,127,201,48,176, 
2,105,58,233,48,76,131,3,32 

DATA 168,11,18,19,18,19,133,13, 
32,168,11,5,13,96,165,181,133 
DATA 27,165,102,41,3,9,4,133,28, 
s2,4,12,32,232,11,185,152 

DATA 9,133,193,73,255,160,,49, 
31,145,31,96,165,38,56 ‚233 ,64 
DATA 133,31 ,165,29,19,38,31,10, 
38,31,169,69,133,32,165,29 

DATA 74,74,74,41,7,1693,96,165, 
188,18,18,19,24,191,97,133,23 
DATA 165,98,195,,1805,64,133,390, 
96,32,288,11,160, ,132,2,32 

DATA 185,11,32,131,9,164,2,145, 
29,200,192,8,209,239 ,32 ,131 

DATA 9,32,131,9,32,185,11,.133, 
13,32,42,11,197,13,240.6 ,32 

DATA 97,12,133,99,96,165,103, 
160,,17,31,145,31,163, ,133,39 
DATA 32,119,18,169,169,32,11@, 
12,169,28,32,134,12,76,143,12 
DATA 169,68, 32,118,12,160,80,32 
134 ,12,78,143,12,141,1,212 


DATA 169,,141,,212,169,17,141,5,; 
212,169,241,141,6,212,169 

DATA 17,141.4.212,96,162,,282, 
203 ,253,136,288,243,936,169, 

DATA 1941,4,212,96,32,208,11,32, 
189,8,169,,133,99,96,165,181 
DATA 133,29,165,182,41,3,3,4, 
133,38,936,,1,.3,94,6,7,3,18,12 
DATA 13,15,16,18,19,21 ,22,26,27, 
32,168,12,169,27,177,29,201 

DATA 169,2088,27,162,17,183.173 
12,196,99,248,14,132,13,282 

DATA 188,173,12,177,29,164,13, 
145,29,208,235,169,168,145,293 
DATA 96,32,168,12,165,99,248, 
248,162,17,221.173,12,248,3,282 
DATA 16,248,188,173,12,177,29, 
2082,183,173,12,145,29,232 ,232 
DATA 224,18,298,239,169,168,168, 
27,195,29,76,58,11,32,4,12 

DATA 169,248,133,31,169,127,133, 
32,162,7,169,15,133,13,138 

DATA 168,177,31,164,13,145,31, 
198,13,202,16,243,165,32,197 
DATA 39,208,6,165,.31,197,29,248, 
13,165,31,56,233,8,133,31 

DATA 176,216,198,32,288,212,32, 
232,11,166,31,185,117,13,133 
DATA 13,185,125,13,168,,49,31, 
74,8,133,2,177,21,37,13,5,2 

DATA 145,31 ,232,2490,3,49,126,, 
69,8,76,181,13,32,189,8,48,96 
DATA ‚i128,192,224 ,248,248 ,252, 
254 ,255,127,63,31,15,7,3,1,32 
DATA 4,12,168,7,162,15,132,13, 
138,168,177,29,164,13,145,23 
DATA 2902,198,13,16,243,165,29, 
24,185,8,133,29,144,2,230,38 
DATA 165,29 ,2081 ,248,288 ,229,165, 
39,281 ,127,288,214,32,4,12 

DATA 32,232,11,162,255,24,98,48, 
62,,68,8,202,228,31,208,246 

DATA 185,117,13,61,,68,133,2, 
189,,690,48,42,57,125,13,5,2,157 
DATA ,‚698,76,189,8,162,,189,,60, 
281 ,255,208,3,232 ,203,246,134 
DATA 2,162,255,228,2,248,63,189, 
‚69,208,5,202 ‚224 ‚255,208 

DATA 242,166,2,189,,68,133,2, 
168,,165,2,57,152,9,249,3,208 
DATA 16,246,132,13,169,,133,98, 
133,198,38,98,18,33,98,18,38 

DATA 98,5,13,19,38,98,18,38,38, 
18,38,38,133,97,32,54,18,56 

DATA 96,168,7,189,,68,217,117, 
13,248,5,136,16,248,48,188,132 
DATA 2,169,,133,28,138,18,38,28, 
18,38,28,10,38,28,5,2,18,38 

DATA 28,18,38,28,18,38,28,133, 
87,165,28,24,105,64,133,28,24 
DATA 96,134,13,133,29,132,30, 
165,993 ,72,165,188,72,165,191 
DATA 72,165,1982,72,160,39,169, 
168,153,,4,136,16,248,169,,177 
DATA 29,248,9,32,92,15,153,,9, 
2008 ,2088,243,162,,132,393,189 
DATA 6,153,,216,153,1,216,209, 
232 ,223,13,2038,247,169,216,133 
DATA 1922,169,,133,1988,133,181, 
133,32,32,47,8,72,41,96 ,288 

DATA 26,104 ,2081,13,248,45,281, 
28,288,239,165,32,248,235,198 


DATA 99,198,32,169,1698,164,99, 
153,,4,16,222,169,32,104,153 
DATA ‚2,196,13,2498,212,164,99,, 
32,492,15,153,,4,238,32 ,239,39 
DATA 288,198,164,32,189,,153,,2, 
184,133,102,184,133,181,194 
DATA 133,1998,1904,133,99,98,72, 
169,32,168,15,162,15,32,102 
DATA 14,152,162,.169,2,32,189, 
255,194,163,162,8,169,3,32,186 
DATA 255,32,192,255,169,1,76,64, 
15,708,73,76,693,78,65,77,693 

DATA 32,,72,74,74,74,74,74,170, 
184,41,31,29,56,15,96, ,168 

DATA 128,192,64 ,224,192,224,169, 
8,32,188,255,169,111,32,1508 
DATA 255,1698,39,169,168,153,,4, 
169,,153,,216,1368,16,243,168 
DATA ‚32,165,255,291,13,248,9, 
32,492,15,153,,4,298,208,248 
DATA 173,,4,13,1,4,41,15,72,32, 
171,255,104,96,169, ,32,253 

DATA 14,208,119,162,3,32,198, 
255,169,,133,144,133,27,32,207 
DATA 255,133,253,32,207 ,255,141, 
254 ,,32,248,15,169,608,133 

DATA 28,169,,133,2,133,29,169, 
64,133,38,165,144 ,208,53,169 
DATA ‚32,207,255,145,29,208,192, 
8,2088,246,168,,166,2,177,27 
DATA 29,152,9,145,27,230,2,232, 
224 ,8,208,6,169,,133,2,239 

DATA 27,165,29,24,1905,8,133,29, 
144 ‚207 ,2308,38,165,39,281,128 
DATA 208,199,32,204 ,255,169,8, 
32,195,255,32,48,198,76,146,9 
DATA 169,,133,198,165,199,248, 
252 ,208,235,168,,152,153,,60 
DATA 298,208 ,250,96 ‚32,204 ,255, 
169,8,32,195,255,786,146,9,32 
DATA 222,13,176,83,165,27,72, 
165,28,72,169,1,32,253,14,133 
DATA 31,184 ,133,28,194,133,27, 
165,31 ,208,197,169,,133,29,163 
DATA 64,133,39,162,8,32,291,255, 
165,253,32,210,255,165,254 

DATA 32,2108,255,165,29,197,87, 
288,6,165,38,197,28,249,148 
DATA 169,,177,29,32,218,255,298, 
192,8,208,246,165,29,24,185 
DATA 8,133,29,144 ,223,230,30, 
283,219,76,189,8,162,4,168,16 
DATA 169,1368,32,1982,14,1693,15, 
133,27,169,4,133,28,32,185,11 
DATA 141,254,,32,185,11,141,253, 
»,?6,146,9,65,78,70,65,78,71 

DATA 83,65,68,82,69,33,33,69,32, 
‚24,185,246,144,2,185,6,105 

DATA 58,76,218,255,72,74,74,74, 
74 ,32,152,16,184,41,15,76,152 
DATA 16,32 ,222,13,176,174,169,, 
32,189,255,169,4,178,168,,32 
DATA 186 ,255,32,192,255,162,4, 
32,281 ,255,169,86,169,32,32,210 
DATA 255,136,298,248,162,7,168,, 
152,32,164,16,169,32,32,2198 
DATA 255,20808,202,16,243,169,5, 
185,108,17,32,218,255,136,16 
DATA 247,169,13,32,210,255,32, 
218,255,165,253,133,31,165,254 
DATA 133,32,169,,133,293,169,64, 
133,39,165,29,197 ,27,298,68 


2428 DATA 165,30,197,28,248,78,165, 5938 2188 DATA 14,152,162,,169,2,32,189, g82D: 
32,32,1649,16,165,31,32,164,16 e55,194,134,147,102,157,76,91 
2438 DATA 169,32 ,32,219,255,32,219, 58832 255 
2e55,168,,177,293,32,164,16,169 2158 DATA ‚32,165,255,291,13,249,9, 5653 
2448 DATA 32,32 ,219,255,2088,192,8, 5182 32,42,15,153,,4,209,203,169 


e1l6a DATA 1,177.178,133,253,299,177, 7976 
178,133,254 ,56,76,125,245,169,, 


208,241,1869,32,32,218,255,32 
24598 DATA 218,255,32,42,11,32,164,16, 5974 


169,13,32,210,255,165,31,24 32,253 

2469 DATA 195,8,133,31,144 ‚2,230 ,32, 5194 2178 DATA 14,234 ‚234 ‚32 ,248,15,32, 5732 
165,29,24,105,8,133,29,144 288 ‚2497 ‚32,23 ,248,176,88 ,32,175 

2478 DATA 170,230,30,208,166,32,2084, 5575 2180 DATA 245,165,183,248,7,92,234, 5853 
255,169,4,76,195,255,77,85 247,144,9,176,74.,32.,44,,247 

2488 DATA 83,75 ,72 ,87 1538 2198 DATA 248,69,175,67,165,144,41, sos2 


16,2088,61,133,195,169,64,133,196 

2298 DATA 32,186,15,176,59,138,105,7, 6484 
178,144 ,2,239,175,134,23,138,41 

2218 DATA 56,74,74,74,168,165,175,56, 6193 
233,64,6,29,492,6,29,42,133 

2228 DATA 29,162,,223,29,249,8,169, 8948 
255,157,,68,232,208,244,185 

2238 DATA 117,13,157,,60,76,25,8,76, sa73 
146,9,48,18,76,146,9 

2268 DATA 222,13,176,33,32,253,14,32, 5962 
208 ,247 ,32,56,,248,176,59,32 

2278 DATA 143,246,165,27,133,174,165, 6658 
28,56,233,64,133,175,165,254,133 

2238 DATA 194,165,253,133,193,24,1081, 6223 
174 ,133,174,165,175,181,194,133 

2298 DATA 175,169,1,32,196,247,176, 8291 


18888 RESTORE :FOR I=2943 TO 4465:READ 2535 
S:POKE I1,S:NEXT I 

18818 POKE 45,114:POKE 46,17 1438 

189828 PRINT "I[CLR,2DOWNISAVE" CHR$ 3128 

(34) "CHECKER.PRG" CHR$ (34)" ,8" 

PRINT "[HOME]"::END 


18838 


188 TRAP 418:RESTORE 952 
11a DATA 8C,19,C1,07,9E,20,34,31,33,38 2320 
128 DATA 88,08,99,AD,ES,07,C3,18,D8,83 2514 
138 DATA CE,ES,97,AD,E8,87,C93,18,09,93 2566 
148 DATA CE ,E8,97,A93,09,80,F1,97,4C,BE 2258 
1598 DATA CE ,A9,39,8D,02,93,A3,18,80,93 2462 


160 DATA 03,A9,11,85,2C,60,n2,10,8E,18 2837 MM 19,169,,133,193,169,64,133 

178 DATA 93,N2,FF ,86 ,3A ,28,54,938,86,3B 28939 I 2398 DATA 194,165,28,133,175,165,27, 6228 

188 DATA 84,3C,AD,C8,8F,C9,nB,Fo,10,n2 zrae fl." 133,174,32,103,248,76,25,9,32 

190 DATA 19,80,C0,8F ,9D,CE,OF,n9,nd,sD sera, 

288 DATA CB,OF ,CA,18,F2,20,73,84 ,AA,Fo 3974 B,* 18828 PRINT "LCLR ,2DOUNISAVE" CHR$ e751 

210 DATA D3,98,03,4C,25,87,20,3E,8E,208 2736] (34) "CHECKER" CHR$ (34) 

220 DATA 53,89,84,08,n9,00,84,08,84,45 zsıe |". 

2308 DATA 84,46,84,09,88,C08,28,A5,04,AA 2997 u". n0.0.0.0 00 00.0 0 u 0 u 0.0 0 0 2 0 a 0 m 0 sn 0 u 5 u 0 5 u 5 u u 8 

249 DATA FO ,38 ,A5 ,08 ‚30 ,0C ‚E® ‚28 ,FO,Fi 2958 air ®- „U UB_U BEE TE EEE U ER EEE HH EEE En En En En En m nm 

258 DATA EO,3N,F0,0C,E0,8F,FO,28,E0,ee 2737 |. A kurzer hoher Ton. Ist die Zeile feh- 

268 DATA D8,02,49,80,09,01,85,08,84,n18 2711 eh yyil] man den Chek- lerhaft, ist ein langer, tiefer Ton zu 
. 


era DATA 89,F0,06,04,69,088,Ch,D®,FA,18 2381 
288 DATA 65,45,85,45,98,92,E6,46,,E8,09 2788 
298 DATA AS,89,29,97,85,09,18,C1,46,98 2912 


= ker mit der Data- hören, und der Cursor springt 


«.. sette benutzen, wieder an den Zeilenanfang (Zeile 
°. muß man die ent- 


308 DATA 98,17 ,AB,FF,A2,14,20,DB,18,C8 2711 fie sprechenden Zei. rd nicht übernommen). Die aku- 
310 DATA A9,80,99,C0,0F ,n2,45,28,08,18 2772 |." j.n der Diskver. stische Kontrolle ermöglicht, Pro- 
Een Inn Bea as es senasenneree ssrefräönduchdere _gramme einzugeben, ohne sän 

r r r ‚ r r [2 r r 7 n. 1 ıln 1 1 “ 
348 DATA 38,20,CE,RA2,28,71,na,na,08,an 2sas |... „en erseize dig den Bildschirm im Auge ha 


358 DATA C8,BD,89,91,F8,08,09,38,39,C0 38128 ben zu müssen. 


ektor für : ; 
368 DATA BF ,E8,D8,F2,60,90,00,00 1838 DEN: Der Basiclader ist so gemacht, 
378 PRINT "ILCLRIDAS PROGRAMM SOLLTE VOR 6897 funktioniert ge- daß man nach dem Einlesen der 


DEM ERSTEN STARTABGESPE ICHERT 
WERDEN! [DOWN] 

388 N=N+1:READ AsinA=sA+DEC (AS): IF LEN 3954 
(A$)=2 THEN 389 

339 PRINT "DATA-FEHLER: [RVS]"AS$:POKE 4489 
1264 ,‚PEEK (63):POKE 1265,PEEK (64): 
POKE 1263,1 

498 A=PEEK (65)+PEEK (66)x256-LEN (A$)- 5877 
1:POKE 1269,A AND 255:POKE 1278,A/ 
BESS:HELP :END 

418 IF ER=38 THEN PRINT "BREAK KANN DAS a242 
PROGRAMM ZERSTOEREN!":END 


nauso wie derfür Datas nur RETURN drücken muß, 
den C 64. Einpaar um das Programm als Maschinen- 
en sprachfile auf Diskette zu schrei- 
mit den Prüfsum- en. Das File kann dann mit Load 
men erscheinterst „CHECKER.PRG",8 geladen und 
nach demersten mit RUN gestartet werden. Auf 


RETURN und befin- keinen Fall den Lader starten und 
det sich am unte- 
ren Bildschirm- den vorgesehenen Save-Befehl 


rand. Esgibtauch nicht bestätigen. Das Programm 


.. 7, nn EEE EEE EEE EEE EEE © © 


428 IF ER=14 THEN RESUME 398 1343 keine eigene Routi- überschreibt sich selbst und ist des- 

438 IF ER<>13.THEN PRINT "ZEILEN- 38493 ne zum Abspei- halb nicht mehr auf normalem‘! 
EINGABEFEHLER !":HELP END chern. Erst einmal ; ” ; 

448 IF N<>259 OR A<>27332 THEN PRINT 5685 mit RUN starten, Weg zu saven. Ist ee En . 
"PRUEFSUMMENFEHLER, BITTE PRUEFEN!* dann auf den Hin- STOP-RESTORE im Basic und hat .:. x 
{END weis des Pro- den abgetippten File noch nicht:- . 

458 RESTORE :FOR A=49897 TO 4354 :READ 3956 . gramms warten, gesaved, kann man mit Sys 2073 a " 
AS:POKE A,DEC (A$):NEXT 5 .. abspeichern und & . 

468 PRINT "DAS KORREKTORSTARTERPROGRAMM 5813 #-: dann noch einmal wieder in den Checker springen, ® 
KANN JETZT ABGESPEICHERT WERDEN. - RUN. ohne das eingegebene Programm !: 


478 POKE 45,3:POKE. 468,17:CLR {iR zu verlieren. 


Faparalyur GBR u. nennen DM 150,— 
(Festpreis inkl. Bauteile) 


Reparatur Diskettenlaufwerke ....... ... DM 120,— 
(Kosten für Motor bzw. Kopf werden 
separat in Rechnung gestellt) 


Rollmaus für den 064 .......nnnnna.... DM 195, — 


Büro für Software- und Hardware-Entwicklung, 
Hackstückstr. 11, 4320 Hattingen, 
0 23 24/5 22 40 


W. DEDERICHS 


INTERPOD 


Mit Interpod können Sie jede Floppy-Disk oder 
Festplatte von den „großen“ Commodore auch 
an Ihrem 064 nutzen. Eigener Prozessor, d. h 
Verträglichkeit mit fast jeder Software da kein 
Speicher belegt wird. Getrennt nutzbares 
RS232-Interface eingebaut (Baud-Rate wähl- 
bar), komplett mit Netzteil, Beschreibung und 
Anschlußkabel ......................DM 298,00 
Original COMPETITION PRO JOYSTICK mit 
öfach Leat-Switches, nylonummantelter Stahl- 
Knüppel 1,5 m Anschlußkabel .......... .DM 49,90 
TRACKBALL in superschwerer Ausführung, ku- 
gelgelagert mit magnetisch gesteuerten Reedkon- 
takten, komplett anschlußfertig ........... DM 69,90 
Informationen auch über Software für C64, Spec- 
trum, QL, Schneider, Händleranfragen erwünscht. 
T. S. Datensysteme Vertriebs GmbH, Denisstr. 45, 8500 Nürnberg 80, 
Tel.: 09 11/28 82 86 


OKIDATA DRUCKER 
OKIMATE 20 


Farbdruck mit über 100 Farbstufen 
EDV-Druck: 80 Zeichen/Sek. 
Schönschrift: 40 Zeichen/Sek 
Vollgrafik (bis 144 x 144 Punkte/Zoll) 
10 nationale Zeichensätze 

4K Puffer 

Ladbarer Zeichensatz 
Punktmatrix-Thermödruck 
Normal-, Thermopapier oder 
Klarsichtfolien 
Voll-COMMODORE-kompatibel 


OKI IST O.K. 


ATENTECHNI K 
PETER FERSTL 
Gebhardweg 2 8000 München 60 


MITGLIED DER Site iö 
Telefon: 089,8 116401 


WWW .HO@MECEOMPUTERWORLB,.CEOM 


wah 


... anIhrem Commodore Computer 
.. rufen Sie uns ungeniert — 


die Service-Profis von 
»Rat und Tat«. 


Wir warten und reparieren 


schnell - preiswert - qut 
Cx commodore 


@VC20 oC64 


und die Peripherie 
@ Fioppy-Disk @ Drucker 
@ Datasette 


Technischer 
Kundendienst 


Bundesweit - an 70 Standorten: 


Augsburg, Tel. (08 21) 465033 

Berlin, Tel. (030) 6 84 60 57-59 

Bielefeld, Tel. (05 21) 208.04 40 

Bocholt, Tel. (028 71) 182195 

Braunschweig, Tel. (05 31) 446 71/8450 99 
Bremen, Tel, (04 21) 414350 

Bremerhaven, Tel. (04 71) 49188 

Celle, Tel, (05141) 6767 

Cuxhaven, Tel. (04721) 51540/37033 
Darmstadt, Tel. (06151) 109252 

Deggendorf, Tel. (0991) 33292 
Dortmund-Holzwickede, Tel (02301) 874 15-16 
Düsseldorf-Eller, Tel. (02 11) 213045 /2229 58-59 
Essen-Vogelheim, Tel. (02.01) 359 23-27 
Frankfurt/Main, Tel. (069) 41 60 11-13 
Freiburg-Gundelfingen, Tel. (07 61) 588 01-02 
Fulda-Petersberg, Tel. (06.61) 619 10 

Gießen, Tel. (0641) 5944 - 45 

Göttingen, Tel. (0551) 782440 
Goslar-Baßgeige, Tel. (05321) 50531/50945 
Hamburg 74, Tel. (040) 731665 -69 

Hannover 1, Tel. (0511) 31046 39/32 7755-56 
Heilbronn, Tel. (07131) 44932 

Hof/Saale, Tel. (09281) 9941 

Idar-Oberstein, Tel. (067 81) 27800 

Ingolstadt, Tel. (08 41) 580.80 

Iserlohn, Tel. (02371) 24151 

Kaiserslautern, Tel. (0631) 859258 / 6.1812 
Karlsruhe, Tel. (07 21) 137257 /21821 

Kassel, Tel. (0561) 7895251 / 103101 
Kempten, Tel. (0831) 24110 

Kiel, Tel. (0431) 680049 

Koblenz-Lützel, Tel. (0261) 820 44-45 
Köln-Rodenkirchen, Tel. (022.36) 6 40 56-57 
Landshut, Tel. (08 71) 267 60 

Limburg/Lahn, Tel. (064 31) 25706 

Lübeck 1, Tel. (0451) 8980.40 

Lüneburg, Tel. (04131) 366 86 

Mannheim, Tel. (0621) 1683330 / 291475 
Memmingen, Tel. (08331) 4335 

Minden, Tel. (0571) 28025-26/881249 
Mönchengladbach-Rheydt, Tel. (0.2166) 42.08 80 
München-Eching, Tel. (0 8165) 74256-57 
Münster, Tel. (0251) 6240 10 

Neumünster, Tel. (04321) 420 61-68 

Neu-Ulm, Tel. (07 31) 840 70 

Nürnberg-Eibach, Tel. (09 11) 2138 16-18 /63 20.02 
Passau, Tel. (0851) 52177 

Pforzheim, Tel. (0 7231) 240 21-22 
Ravensburg, Tel. (07 51) 25116 
Recklinghausen, Tel. (0 2361) 2095 51/37 2279 
Regensburg, Tel. (0941) 53446 

Rendsburg, Tel. (04331) 204304 

Rosenheim, Teil. (08031} 42205 

Saarbrücken, Tel. (0681) 3017278/37093 
Siegen /Haiger, Tel. (027 73) 2446 

Singen, Tel. (0 7731) 67870 

Solingen 1, Tel. (02 12) 200880 
Stuttgart-Leonberg, Tel. (0 7152) 72238-39 
Trier, Tel. (0651) 73209 

Villingen, Tel. (0 7721) 54190 
Wiesbaden-Delkenheim, Tel. (06122) 522 71-72 
Wilhelmshaven, Tel. (044 21) 42399 

Würzburg, Tel. (0931) 50289 


Voll im Bild mit 
Hires-Basic 


Grafik-Erweiterungen für den C64 
bieten meist nur die bekannten 
Befehle zum Zeichnen und Lö- 
schen von Punkten und Linien. 
Vielleicht noch ein paar Extras 
hier und da — dann haben sie ihr 
Pulver verschossen. 

HIRES 64 geht weit über die Stan- 
dardbefehle hinaus. Ungewöhn- 
lich sind die Kommandos zur fort- 
geschrittenen Bildmanipulation. 
So können Grafiken als Ganzes 
oder ausschnittsweise vergrößert 
und verkleinert werden. Verzer- 
rungseffekte machen auf Wunsch 
den starren Bildschirm zum dehn- 
baren Gummi. Wer will, kann dem 
Bild sogar mit frei definierbaren 
Pinseln zu Leibe rücken! 

HIRES 64 unterstützt drei ver- 
schiedene Auflösungen: 

320%*200 = hochauflösende Grafik 
(zwei Farben), 

160*200 = Multicolorgrafik (vier 
Farben), 
80 +50 
Farben). 
HIRES 64 belegt den Speicher- 
bereich von $8000—$9FFF 
(32768—40959). Es werden also 
8 K des BASIC-Speichers bean- 
sprucht. Mit Ausnahme von $C000 
bis $C5FF wird auch das gesamte 
RAM von $A000 bis $FFFF be- 
nutzt. Der Grafikbildschirm liegt 
ab $E000 und der normale Text- 
bildschirm ab $0400. 

Die Befehle: 

(In Klammern angegebene Argu- 
mente können entfallen. Die Klam- 
mern müssen in der Regel nicht 
gesetzt werden!) 

l. Grafik-Steuerbefehle: 
GRABPHIC 0 (‚Vordergrund (,Hin- 
tergrund (‚Rahmen))) 

GRAPHIC | (‚Vordergrund ,Hin- 


= Viertelblockgrafik (zwei 


tergrund) 
GRAPHIC 2 (,Farbel,Farbe2 
(‚Farbe3 (‚Hintergrund _(,Rah- 
men)))) 


Der erste Parameter gibt den Gra- 
fikmodus an, alle weiteren setzen 
die Farben im jeweiligen Modus 
fest. Die drei Grafikmodi sind: 


14 UM Sonderheft 2 


Grafik total — 40 Befeh- 
le manipulieren Lores 


und Hires. Bilder wer- 


den gedehnt und ge- 


staucht, gefiltert und 


verzerrt. 


0 : Textbildschirm, 80*50 Punkte 


1 : Grafikbildschirm, 320 * 200 
Punkte 
2 : Grafikbildschirm, 160*200 
Punkte 


Nach jedem Neustart ist Modus 0 
eingestellt. Die Grafikbefehle sind 
auch im Textmodus (0) als Viertel- 
block-Grafik verfügbar. 


10 
20 
308 
40 
50 
60 


rem churchills auge 
rem copy bearbeitet 
reset:graphic 1,0,14 
xa=140:ya=65 
xb=-1S8:yb=S5 


78 
808 
er) 
188 inkey a$:graphic B:end 


gosub 288: rem auge 


gosub 288: rem auge 


2EBB copy xa,ya,xb,yb,xz 


SPLIT (m(,n)) 

Dieser Befehl teilt den Bildschirm 
in zwei Bereiche, wobei der obere 
für Grafik und der untere für Text 
reserviert wird. 

m gibt an, ob das „Splitting" ein- 
(m=]1) oder ausgeschaltet (m=0) 
werden soll. Bei m=0 gibt der 
zweite Parameter an, ob der Text- 
bildschirm (n=0) oder der Grafik- 
bildschirm (n=1) angezeigt wer- 
den soll. Voreingestellt istn=0. Ist 
m=]1, gibt n die Zeile an, ab wel- 
cher auf den Textbildschirm um- 
geschaltet wird. SPLIT ohne Para- 
ıneter hat dieselbe Wirkung wie 
SPLIT 1,18. Im Gegensatz zu GRA- 
PHIC wird durch SPLIT der Gra- 
fikmodus nicht beeinflußt. Das 
heißt, daß zum Beispiel der Text- 
bildschirm angezeigt, aber auf 
dem Grafikbildschirm gezeichnet 
wird. 


mit 


:rem koordinaten von 
:rem churchills auge 
size 1,128,1,64:xz*-50:yz=30 


nach links oben,1.5%1.25 


size 2,0,2,8:xz=-200:yz=128 


nach rechts unten, 2*2 


‚yz:return 


Listing 1: Churchills Auge wird mit COPY bearbeitet. 
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RASTER x,y(‚m) 

Mit RASTER wird eine Schablone 
mit einem bestimmten Muster auf 
die Zeichenfläche gelegt, wobei x 
und y die Form des Musters be- 
stimmen. Es werden dann nur 
noch Punkte gezeichnet, die nicht 
durch die Schablone verdeckt 
sind. Mitm=1 kann das Raster „in- 
vertiert" werden. Ist ein Pinsel 
durch BRUSH aktiv, so zeigt RA- 


u 


Im 


mm 


N All 


STER keine Wirkung, außer bei 
FILL. 

X und y müssen zwischen 0 und 
255 liegen. 

WINDOW m(,x1,y1,x2,y2) 

Mit diesem Befehl kann die Zei- 
chenfläche verkleinert werden. 
Bei m=0 wird das Fenster aus-, 
bei m=1| eingeschaltet. Die fol- 
genden Koordinaten geben den 
Bereich an, in dem nn 


Au 


FR errill 


| 


rersittrersTtmnTgTii 


Tl) 


Bild 2: Listing 2 erzeugt ausgefüllte Ellipsen durch CIRCLE, RASTER und FILL,. 


12 rem demo fuer copy,size,style 
e® rem raster,fill,trans,text 


1008 
118 
120 
125 
138 
132 
13% 
148 
150 
162 
178 


reset 

clear 

graphic 2,2,5,14,28 
c=1 


next 
size 4,0,4,0 


trans $a30800, $e800 


for i=.1 to BB step 5:circle 80,108,i,c 
ce=c+l:if c>3 then c=1 


copy 60,75,100,125,0,8 
for i=8 to 899:next 


Hl 


188 
198 


for i=79 to 4 step-5:raster 
rnd(8)*S,rnd(lB8)*5,rndl1)*2 
fill i,188,rnd(®)*3+l:next 


200 
218 
228 
238 
242 
258 
260 
278 
280 
2398 
388 
318 
3228 
338 
348 
35® 


clear 


style 27, 2,20,1 
style.®,-1,-1,9 
style 1,8,80,-1 
style, -1,1,1,0 


style 151,150 


graphic 2 


for i=® to 1999:next 


size 2,0,2,8:space '16,8:raster 8,08 
text ®, 0,’ 'abcdefgh”, E 


text 16,32, "abedefgh” ‚2 
text 16,82, "abedefgh”,3 
text 8,112, ”abcdefgh”,3 
text 16,128, "abcdefgh”,2 


text 8,168, "abcdefgh”,1 
for i=® to 1399:next 


Listing 2: Demo zu den Befehlen COPY, RASTER, FILL und TEXT (siehe Bild 2) 
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werden soll. Der Koordinatenur- 
sprung wird nach (xl,yl) verlegt. 


BRUSH Anzahl G13a,Y1 
(‚Xi+1,Yi+ I(...)))) 

Mit BRUSH kann man sich seine ei- 
genen „Pinsel“ definieren. Anzahl 
gibt an, wie viele Punkte der Pin- 
sel haben soll; i ist der Index, ab 
welchem die folgenden Werte im 
„Pinselspeicher" abgespeichert 
werden sollen. Xi,Yi...... sind rela- 
tive Koordinaten, die zum vorher- 
gehenden Punkt addiert werden. 
Ein Pinsel kann aus maximal 127 
Punkten bestehen. 

BRUSH funktioniert bei allen all- 
gemeinen Zeichenbefehlen (siehe 
unten), außer bei FILL. So können 
durch die gleichzeitige Bewegung 
der „Pinselborsten“ Kreise, Li- 
nienzüge und sogar Texte an meh- 
reren Stellen zugleich gemalt wer- 
den! 

In Bild 3 wird der BRUSH-Befehl 
näher erläutert. 

Beispiel: 

10 RESET:CLEAR 

20 GRAPHIC 1,14,0 

30 BRUSH 5,0,1,1,l.l, ala ka 

40 LINE 10,10,100,10 

50 CIRCLE 100,100,40 

60 PLOT 30,30 

70 REC 100,100,200,150 

80 INKEY A$ 

90 GRAPHIC 0 

BRUSH 3$ 

Ein vorher mit a$=BRUSH$ abge- 
speicherter Pinsel kann durch 
diese Anweisung wieder aktiviert 
werden. 

ROT w 

Der aktuelle Pinsel wird um einen 
bestimmten Winkel gedreht. Der 
Drehwinkel (in Grad) errechnet 
sich aus (w+1)*90. 

SIZE xh,xI(‚yh,yl) 

Dieser Befehl stellt den Vergröße- 
rungsfaktor in x- und y-Richtung 
für die Befehle TEXT, BITS, COPY 
und MOVE ein. Auch Verkleine- 
rung ist möglich. 

Die Faktoren errechnen sich fol- 
gendermaßen: 

xf=xh+x1/256 

yf=yh+yl/256 

xh reicht von 0-160, yh von 
0—100. xl und yl können zwischen 
0 und 255 liegen. Der Standard- 
wert ist SIZE 1,0,1,0 (keine Vergrö- 
BRerung). 
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STYLE x1 yl(,x2,y2) 

Auch STYLE bezieht sich nur auf 
die oben genannten vier Befehle. 
x],yl = Vektor von einem Zeilen- 
anfang zum nächsten 

x2,y2 = Vektor von einem Punkt 
innerhalb einer Zeile zum näch- 
sten 

Durch diesen Befehl ist es mög- 
lich, Text oder andere Grafikbe- 
reiche zu spiegeln, zu drehen und 
zu verzerren. Älle vier Parameter 
können zwischen -16384 und 
+ 16383 liegen! Voreinstellung ist 
STYLE 0,1,1,0 (normale unverzerr- 
te Abbildung). 

In Bild 4 wird der STYLE-Befehl 
näher erläutert. 

RESET 

Es wird der Grundzustand herge- 
stellt. RESET hat denselben Effekt 
wie folgende Anweisungen: 
GRAPHIC 0:SPLIT 0:WINDOW 0 
BRUSH 0:RASTER 0,0 

SIZE 1,0,1,0:STYLE 0,1,1,0 

SPACE 8,0 

2. Allgemeine Zeichenbefehle: 
Für alle folgenden 14 Befehle gilt: 
Sämtliche Koordinaten können im 
Bereich von -16384 bis + 16383 
liegen! 

m = Zeichenmodus: 

0: Punkt(e) löschen 

l; setzen oder Farbe 1 bei Multi- 
colorgrafik (= Grafikmodus 2) 

2: invertieren (gesetzte Punkte 
löschen und gelöschte setzen) 
oder Farbe 2 bei Grafikmodus 2 
3: Farbe 3 (nur im Grafikmodus 2) 
4: nichts verändern 

Wird m weggelassen, so gilttm=1 
LINE x],y1,x2,y2(‚,m) 

Es wird eine Linie vom Punkt 
(xl,yl) zum Punkt (x2,y2) gezeich- 
net. 

Beispiel: LINE 0,0,70,40 

PLOT x,y(‚m) 

PLOT zeichnet an der Stelle (x,y) 
einen Punkt (oder Pinsel). 

DRAW x1,yl(‚m(‚x2,y2(,m(..)))) 
DRAW zeichnet Linienzüge, wo- 
bei der Anfangspunkt durch BE- 
GIN festgelegt wird: 

BEGIN (x,y) 

Falls angegeben, wird der Punkt 
(x,y) beim nächsten DRAW-Befehl 
als Ausgangspunkt verwendet. 
BEGIN alleine bewirkt, daß der 
erste Punkt bei DRAW als An- 
fangspunkt dient. Beispiel: 


16 QUO Sonderheft 2 


BEGIN 0,0:DRAW 10,20,1,5,10 

ist dasselbe wie: 

BEGIN:DRAW 0,0,1,10,20,1,5,10 
REC x],y1,x2,y2(,m) 

REC zeichnet einen Rahmen, des- 
sen Diagonale die Linie von 
(xl,yl) nach (x2,y2) ist. 

Beispiel: REC 0,0,79,49,2 

BLOCK x1,y1l,x2,y2(,m) 

Es wird ein ausgefülltes Rechteck 
gezeichnet, ansonsten wie REC. 
COPY x1,y1,x2,y2,x3,y3 

Es wird der rechteckige Bereich 
zwischen (xl,yl) und (x2,y2) nach 
(x3,y3) kopiert. Je nach den Änga- 
ben bei SIZE und STYLE wird ver- 
größert, gedreht, verzerrt oder 
gleichgelassen. Liegt der Quell- 
bereich teilweise außerhalb des 
Bildschirms, so bestimmt Spei- 
cherzelle 2, in welchem Zeichen- 


Bild 3: BRUSH 4,0,0,0,11,12,1-1er- 
zeugt einen „Pinsel“ mit vier Borsten 

N . Die vier Koordinatenpaare (Pa- 
rameter 3—10) geben die Lage jeder 
Borste relativ zu ihrem Vorgänger an. 
Alle Zeichenbefehle bewegen nun 


die vier Borsten synchron und malen 
mit mehrfachem Strich (rechts). 


modus dieser Bereich kopiert 
wird. Beispiel: 

POKE2,1:COPY -10,-10,-1,-1,0,0 
Der (nicht sichtbare) Bereich von 
(-10,-10) bis (-1,-1) wird nach 
(0,0) kopiert und zwar gesetzt (Far- 
bel). 

MOVE x],y1,x2,y2,x3,y3(,m) 
Dieser Befehl bewirkt dasselbe 
wie COPY, aber der Quellbereich 
wird vorher gelöscht. 


TEXT x,y,a$(,m) 
Der Text in a$ wird auf den akti- 
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ven Zeichenbildschirm ab (x,y) 
ausgegeben. Mit SIZE und STYLE 
kann die Größe und das Ausse- 
hen der Buchstaben verändert 
werden. In a$ können auch folgen- 
de Steuerzeichen verwendet wer- 


den: 

CTRL+RVS ON = Reversmodus 
einschalten 

CTRL+RVS OFF = Reversmo- 


dus ausschalten 

HOME = Sprung zum Punkt (0,0) 
SHIFT+CLR = den Bildschirm 
löschen, aber ohne HOME! 
CTRL+A = Groß-/KRleinschrift- 
modus einschalten 

CTRL+B = Großschrift-/Grafik- 
modus einschalten 


SPACE x,y 
Mit diesem Befehl kann bei TEXT 
der Abstand eines Zeichens zum 


alte Position neue Position 


® rem demo Fuer window und 
scroll 
reset 
clear 
graphic 1,14,8 
rec 7B8,93,241,195 
rec 77,933; 842,105 
60 a$=" *#+*# hires 64 
Cc) 1985 by anton leherbauer 
78 window 1,0,8,239,199 
80 1-len(a$) 
98 z=1:y-96:a=-12:b=-29:s=1 
188 for i-ito 1 
118 For p=239 to 232 step-s 
128 text p,y,mid$(a$,z,$1) 
138 scroll 8,$a,b,a,a:next 
149 z=z+$1 
158 ifz>1lthenz-$1 
168 next 
178 for i=®d to 999:next 


188 graphic ® 


Listing 3: Demo zu den Befehlen WIN- 
DOW und SCROLL 


Re 


nächsten in x- und y-Richtung ver- 
ändert werden. Normal ist SPACE 
8,0. 

BITS x,y‚,m,a$ 

Mit BITS kann man beliebige Figu- 
ren auf den Bildschirm bringen. 
Der Stringausdruck a$ wird ab 
(x,y) auf den Bildschirm gezeich- 
net, und zwar bedeutet ein "*" in 
a$, daß ein Punkt im angegebe- 
nen Modus gezeichnet werden 
soll. Ein Leerzeichen bewirkt nur 
ein Weiterrücken des „Zeichen- 
stiftes“. Auch hier kann die Ausga- 
be durch SIZE und STYLE verän- 


dert werden. 

Beispiel: BITS 10,101" *xx* 
KREIEREN 

CIRCLE mx,my,r(,m) 


Es wird ein Kreis mit dem Mittel- 
punkt (mx,my) und dem Radius r 


18 rem demo Fuer at,window, 
Fill,block 

182 reset 

118 text 7,5, "3hires 64” 
128 at(18,13)”von” 

138 at(12,28)”anton 
leherbauer” 

148 rec 22,38,57,43 

158 For i=-® to 1999:next 
162 window 1,8,19,79,49 
178 Fill 98,08 

188 For i=8 to 999:next 
190 window ® 

208 block 8,8,79,49,2 
21®8 for i=® to 999:next 
2e2B window 1 

238 fill 8,8 

242 window B 

858 block 8,0,79,49,2 
2P6B inkey a$ 

278 


print ”3” 
ready. 


Listing 4: Demo zu den Befehlen AT, 
WINDOW, FILL und BLOCK 


gezeichnet. Der Radius kann eine 
beliebige Fließkommazahl sein 
mit Ausnahme von 0. Im Multico- 
lormodus wird allerdings kein 
Kreis, sondern eine Ellipse ge- 
zeichnet. Daher sollte man in die- 
sem Modus auf den Befehl BOW 
zurückgreifen. 

BOW mx,my,xr,yr,aw,ew,sw(,m) 
Mit diesem Befehl können beliebi- 
ge Bögen, Kreise und Ellipsen ge- 
zeichnet werden. 

mx,my = Mittelpunkt 

xr,yr = Radien in x- und y-Rich- 
tung (beliebige Fließkommazah- 


len) 
aw,ew = Anfangs- und Endwin- 
kel 
sw = Schrittweite von aw bis ew 


(aw,ex,sw im Bogenmaß: 0—2*pi) 
FILL x,y(‚m) 


Bild 4: STYLE 0,1,1,0 ist die Normalein- 
stellung (oben links): Von einem Zei- 
lenanfang zum nächsten führen null 
Schritte in X-Richtung und ein Schritt 
in Y-Richtung (senkrechter Pfeil). In- 
nerhalb einer Zeile liegt der jeweils 
nächste Punkt ein Schritt in X-Richtung 
und null Schritte in Y-Richtung (waag- 
rechter Pfeil). 

STYLE -1,1,1,0 beispielsweise ergibt 
eine verzerrte Darstellung (oben Mit- 
te, siehe auch Bild 7). 

STYLE 0, -1,1,0 bewirkt eine horizon- 


tale Spiegelung (oben rechts). 


FILL füllt beliebige Flächen mit ei- 
ner Farbe. Besonders schöne Ef- 
fekte erzielt man durch die Kombi- 
nation mit RASTER. BRUSH hat auf 
FILL keine Wirkung! 

3. Spezielle HGR-Befehle: 

Die folgenden acht Befehle bezie- 
hen sich nur auf den Grafikbild- 
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schirm. Sie sind vom eingestellten 

Grafikmodus unabhängig. 

GSAVE "Name“(‚ga(,sa)) 

Der Grafikbildschirm wird unter 

dem Namen "Name" gespeichert. 

ga = Geräteadresse 
(Voreinstellung: 8) 

sa = Sekundäradresse 

GLOAD 'Name“(‚ga(,sa)) 

Wie GSAVE, eine Grafik wird ge- 

laden. 

HCOPY (gm(‚adr)) 

Eine Hardcopy wird erstellt. Die 

Hardcopy-Routine ist für einen 

Star SG-10 mit Commodore-Inter- 

face geschrieben. Der Grafikmo- 

dus des Druckers kann durch An- 

gabe von gm und die Startadresse 

der Grafik mit adr geändert wer- 

den. Voreingestellt ist gm=4, 

adr=57344 (=$E000). 

SCROLL ri,x1,x2,y1,y2(‚anz) 

Der angegebene Bereich von x] 

bis x2 und yl bis y2 (in minimal 

8x8-Pixel-Blöcken) wird anz mal 

um jeweils ein Pixel in eine be- 

stimmte Richtung verschoben. 

Folgendes ist zu beachten: 

ri=0 => links 

ri=]l => rechts 

ri=2 => oben 

ri=3 => unten 

0<=xl<=x2<=39 

0<=yl<=y2<=24 

TRANS adrl,adr2(‚x1,y1,x2,y2) 

Mit diesem Befehl kann man ent- 

weder die gesamte Grafikseite ab 

adr!l oder den angegebenen Be- 

reich in einen anderen Grafikspei- 

cher ab adr2 kopieren. 

xl,yl = linke obere Ecke des 

Bereichs 

x2,y2 = Breite und Länge 

Die Auflösung beträgt in x-Rich- 

tung 40, in y-Richtung 200 Punkte. 

CLEAR (byt(‚adr(‚x1,y1,x2,y2))) 

Der Grafikspeicher ab adr wird 

mit byt angefüllt. Auch hier kann, 

wie bei TRANS, ein Bereich ange- 

geben werden. Voreingestellt ist 

byt=0 und adr=$E000 (=57344). 

INVERS (adr,x1,y1,x2,y2) 


Dieser Befehl ist analog zu 
CLEAR, er wird jedoch invertiert. 
FTEXT x,y,a$ 


Mit FTEXT können, wie bei TEXT, 
beliebige Texte in die Grafik ge- 
schrieben werden. Auch hier kön- 
nen alle bei TEXT beschriebenen 
Steuerzeichen verwendet wer- 


den. Der Unterschied zwischen $ 
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Bild 5: Extravagante Schrift 


®O rem demo : 
l rem 
2 rem 
SER 
10 
24%} 
38 
40 
s2 
68 
78 
B2 
92 
188 
118 
128 
138 
1428 
158 
168 


reset:graphic 1:clear 


brush 2,8,2,0,1,1 
EBxt SO, 1e.t9;2 

brush 2,0,82,8,2,2 
test S;S2,t8,2 

brush 3,0,2,8,1,1,1,1 
tBxt, 5,924,t8,2 


text 5,1390,t35,2 
brush ® 


text 8,178, 


text 258,177, 


Blb.se IR le: A 


se m es rk tin wenn] RL Fi, 


brush 3,0,2,0,2,1,2,2 


style 1,1,1,2:size 1, 


style 8,1,1,2:size l, 


en durch Listing 5 


erzeugung von hohlschrift 
und 3d-schrift mit brush/text. 
text-befehl mit ... 


‚2 verwenden 


style 8,1,1,2:size 3,8,3,8:space 24,8 
t$=-"BBbchkbc ebchebc” 


8,1,12B:space B,® 
’a Hohlschrift und 3D-Schrift mit ” 


2,1,192 


"EIBRUSH” 


Listing 5: Hohlschrift und 3D-Schrift durch BRUSH und TEXT (siehe Bild 5) 


TEXT und FTEXT liegt darin, daß 
bei FTEXT die Befehle SIZE, 
STYLE und SPACE keine Wirkung 
haben. 

x: O bis 39 

y: O bis 199 

4, Sonstige Programmierhilfen: 
OLD 

Ein BASIC-Programm kann nach 
einem Reset oder nach NEW 
durch OLD zurückgeholt werden. 
DIR (ga)(a$) 

Das Directory einer Diskette wird 
von der Floppy Nr.ga auf dem 
Bildschirm angezeigt. Mit a$ kann 
das auszugebende Directory nä- 
her umschrieben werden. 
Beispiel: DIR "*=P" ... gibt alle 
Programmfiles (P) der Diskette auf 
den Bildschirm aus. Eigentlich 
müßte der String "$:*=P“ lauten, 
aber HIRES 64 ergänzt: dies selb- 
ständig. 
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APPEND 'Name'(,ga(,sa)) 

Das Programm "Name" wird gela- 
den und an das im Speicher be- 
findliche BASIC-Programm ange- 
hängt. Die Zeilennummern des an- 
gehängten Programms müssen 
größer als die des ersten sein. 
Voreinstellung für die Geräte- 
adresse ga ist 8, 

DISK (ga) ("Befehlsstring") 

Mit DISK kann entweder der Feh- 
lerkanal ausgelesen (DISK ohne 
Befehlsstring) oder ein Diskbefehl 
gesendet werden. 

DEV ga 

Die Standardgeräteadresse für 
LOAD, SAVE, VERIFY, GLOAD, 
GSAVE, APPEND, DIR und DISK 
wird neu festgesetzt. Nach dem 
Laden ist 8 voreingestellt. 

AUTO sw 


» Nach Eingabe einer BASIC-Pro- 


grammzeile wird die um sw erhöh- 
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te nächste Zeilennummer ausge- 
geben. AUTO 0 beendet die Zei- 
lennummernvorgabe. 

AT (Spalte, Zeile) 

Dieser Befehl entspricht PRINT. 
Zusätzlich kann die Spalte und Zei- 
le, ab der der folgende Ausdruck 
ausgegeben wird, festgesetzt wer- 
den. Die Klammern müssen ge- 
setzt werden. Zwischen AT und 
der ersten Klammer darf kein 
Leerzeichen stehen. 

INKEY a$ 

Dieser Befehl liest ein Zeichen von 
der Tastatur. Es wird so lange ge- 
wartet, bis eine Taste gedrückt 
wird. 

Beispiel: 10 INKEY taste$ .. .er- 
setzt die Zeile: 
10 GET 
THEN 10 
OFF 

Die Befehlserweiterung wird ab- 
geschaltet, Um sie neu zu starten, 
muß POKE 32772,195 :SYS 64738 
eingegeben werden. 

5, Funktionen: 

BRUSH$ 

Einmal erstellte Pinsel können 
durch diese Funktion einer String- 
variablen zugewiesen werden 
(siehe BRUSH). 

POINT (x,y) 

Diese Funktion liefert folgende Er- 
gebnisse: 
Grafikmodus 0: 
POINT(&,y)=0 .. 
nicht gesettzt. 
POINT&,y)=1. 
Grafikmodus |: 
analog zu Grafikmodus 0 


taste$:IF taste$="" 


‚Punkt (x,y) ist 


. ‚Punkt ist gesetzt. 


Grafikmodus 2: 
POINT(x,y)=Farbe des Punktes 
KY). 

DEV 


Das Ergebnis dieser Funktion ist 
die letzte durch den Befehl DEV 
eingestellte Geräteadresse. 
$hhhh ‚%bbbbbbbbbbbbbbbb 
Durch Voranstellen von $ oder % 
kann man Integerzahlen auch in 
hexadezimaler oder binärer Form 
angeben. Die Länge der Hex- 
oder Binärzahlen kann maximal 
vier beziehungsweise 16 Zeichen 
betragen. 

6. Sonstiges: 

Der Befehl INPUT kann mit ! abge- 
kürzt werden. 

Jede Ausgabe auf den Textbild- 


schirm kann durch Drücken von» 


RUN ist das 
unabhängige COMMODORE- 
Computermagazin. 

Monat für Monat erfahren Sie 
hier Neues und Interessantes, 
finden Sie viele Listings, 

Tips & Tricks aus der Welt des 
COMMODORE. 

Bleiben Sie am Ball und halten 
Sie Ihr COMMODORE- 

Wissen stets auf dem laufenden. 
Mit Ihrem persönlichen 
Abonnement von RUN! 


ier! 
ff 
„__ 10MB 


LS 


CW > PUBLIKATIONEN 


Eine Erste Adresse für die Computerwelt. 
MAN HOREEOMBUTERWOREB ZOOM Friedrichstraße 31, D-8000 München 40 


N "+" angehalten und mit einer be- 
EEE TE A liebigen Taste fortgesetzt werden. 
AFP FIHFE z Da während des Zeichnens auf 
F dem Grafikbildschirm RUNSTOP/ 
RESTORE nicht gedrückt werden 
sollte (Absturzgefahr!), dient F8 
dazu, die Ausführung von 
“ Zeichen- oder sonstigen Befehlen 
zu unterbrechen. 
Die HIRES-64-Befehle können wie 
normale BASIC-Befehle abgekürzt 
werden (siehe Tabelle ]). 
Die Demos in Listing 1 bis 6 
machen mit den Möglichkeiten 
des Programms vertraut. 
HIRES 64 ist als kombinierter Hex- 


Bild 6: Schrift in allen möglichen Größen und Himmelsrichtungen dump-Basiclader abgedruckt 


APPEND ASHIFTP 
AT( keine Abkürzung 
AUTO ASHIFTU 
BEGIN BSHIFTE 
BITS BSHIFTI 
BLOCK BSHIFTL 
BOW BSHIFT O 
BRUSH BSHIFTR 
CIRCLE CSHIFTI 
CLEAR CLSHIFTE 
COPY CO SHIFTP 
DEV keine Abkürzung 
DIR keine Abkürzung 
DISK DI SHIFT S 
DRAW DSHIFTR 
FILL FSHIFTI 
FTEXT FSHIFTT 
GLOAD GSHIFTL 
GRAPHIC GSHIFTR 
GSAVE G SHIFTS 
"HGOPY- U HSHIETG 
INKEY IN SHIFTK 
INVERS INSHIFTV 
LINE LISHIFTN 
MOVE M SHIFT O 
OEE OSHIFTF 
OLD O SHIFTL 
PLOT PSHIFTL 
POINT( PO SHIFTI 
RASTER RSHIFTA 
REG keine Abkürzung 
RESET RESSHIFTE 
ROT RSHIFT O 
SCROLL SSHIFTC 
SIZE SISHIFT Z 
SPACE SPSHIFTA 
SPLIT SP SHIFTL 
STYLE ST SHIFTY 
TEX: WSEHFLE 
TRANS TSHIFTR 
WINDOW W SHIFTI 


Tabelle 1: Abkürzungen für die 
Bild 7: Lady verzieht Miene durch Copy-Befehl und STYLE -1,1,1,0 HIRES-64-Befehle 
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reset:graphicl:clear 
style 1,1,1,-1:size 3,80,3,8 
space 1B,-20 
text 5,179, ”schraeg-” 
style 20,1,1,1 :size 4,0,4,8 
text 73,142, ”schrift” 
style 8,1,1,08 
s=256 
lb=s and 255:hb=s/256 
size hb,1b,hb, 1b 
space s/32,s/64 
text 239-s/40,s/12-29, "abc", 1 
s=5*1 .5:if s<22988 then Bd 
style -1,1,-1,8:size 1,128,2,32 
space -12,8 
text 128,2, ”Espiegel-” 
text 120,228, "Sschrift” 
style -1,1,1,08 
space 12,8 
text 20,40, "Eidrevers-” 
text 28,60, "Silschrift” 
style 8,1,1,2:size 1,980,1,68 
space 9,2 
text 141,185, ”invertiert”,2 
inkey a$:graphic ® 


Listing 6: Demo zu den Befehlen TEXT, SPACE, STYLE und SIZE (siehe Bild 6 


(Listing D). Wie man mit dieser Art 
von Listing umgeht, steht "auf 
Seite 6. Wird das Programm als 


dann die Daten in den Speicher 
gepoket. Das fertige Maschinen- 
programm kann dann mit 


auf Diskette abgespeichert wer- 
den. Wird es als Hexdump einge- 
geben, so muß der Checker be- 


BEN EENEEEHESNEEN 


Basiclader eingegeben, so muß 
der Lader vor dem Start abgespei- 
chert werden. Nach RUN werden 


POKE 43, 1:POKE 44, 8 
POKE 485, 44:POKE 48, 40 
SAVE "NAME'",8 


nutzt werden. Als Startadresse ist 
0801 anzugeben. 


(Anton Leherbauer,) TRMMEEERRIREETSIREERTEN 


0C,08,C2,07,9E,20,32,38, 3E 
8803 28 DATA 36,32,08,00,00,A9,2C,A2, E6 
o811 30 DATA 08,85,5F,86,60,A9,2C,A2, SE 
8819 48 DATA 28,85,5A,86,5B,A9,20,A2, 88 
2821 s® DATA A,85,58,86,59,20,B8,A3, 3B 
0823 60 DATA 4C,E2,FC,89,80,3F.,88,C3, 5A 
0831 78 DATA C2,CD,38,390,20,A3,FD,20, 57 
08393 828 DATA 50,FD,20,71,80,20,5B,FF, BF 
0841 32 DATA 58,20,53,E4,20,BF,E3,20, CC 
0849 188 DATA 59,80,A9,9B,A0,88,20,1E, 83 
0851 118 DATA AB,AS,00,85,37,A9,80,85, 07 
8859 128 DATA 38,A0,09,A2,05,18,20,F®, ıD 
0861 138 DATA FF,20,30,E4,20,E2,80,4C, SE 
0869 148 DATA 9D,E3,28,BC,F6,20,E1,FF, D6 
08871 158 DATA F0,03,4C,72,FE,20,71,808, S4 
0879 168 DATA 208,A3,FD,20,18,E5,20,59, 55 
oB81 1780 DATA 80,4C,7B,E3,A9,0E,8D,86, 6E 
0883 188 DATA 02,AS,00,80,21,00,80,20, 8C 
0891 138 DATA D®,A9,90,A2,81,8D,8F,02, 36 
08393 208 DATA BE,30,02,60,18,A2,30,A0, A7 
DBA1 218 DATA FD,86,C3,84,C4,AQ,1F,B1, 48 
BBAI 228 DATA C3,99,14,203,88,10,F8,B®, FA 
O8B1 238 DATA 14,A9,4A,80,16,03,A9,80, 65 
0889 e4® DATA BD,17,03,A9,68,80,26,83, CF 
d8C1 25® DATA AS,81,80,27,03,60,93,0D0, B7 
08C9 260 DATA 20,20,20,20,20,20,20,2R, F6 
08D1 270 DATA 2A,2A,20,20,48,20,49,20, 51 
08093 2808 DATA 52,20,45,20,53,20,20,20, BA 
OBE1 290 DATA 36,20,34,20,20,2A,2A,2A, 20 
OBES 308 DATA 0D,00,20,20,20,20,28,20, 008 
OBF1 318 DATA 28,43,29,20,31,39,38,35, E93 


eA21 690 BAIA BD,00,02,38,F1,FB,FO,F4, 78 
BR2S 702 DATA C9,80,00,2E,05,0B,n4,71, 17 
eR31 710 DATA E8,C8,39,F8B,01,B9,FB,.01. 00 
0R33 720 DATA F0,39,38,E3,3R,F0,04.C9. SC 
oA41 730 DATA 49,00,02,85,0F,38,E9,55, 62 
OR493 740 DATA D9,92,BD,00,02,F0,E1,C5, 29 
ORS1 750 DATA 08,F0,DD,C8,39,FB,01,E8, E6 
ORSS 760 DATA D8,F0,E6,0B,A6,7A,88,20, HE 
OARE1 770 DATA S2,82,B1,FB,10,F9,20,52, 60 
eA693 780 DATA 82,B1,FB,00,B3,BD,00,02, Fi 
eR71 790 DATA 4C,03,82,99,FD,01,C6,7B, 78 
oRA73 808 DATA A9,FF,85,74,60,C8,C0,FF, 0E 
OR81 810 DATA D0,09,C8,49,8B8,85,FB,A9, 3D 
BRBS 828 DATA 9D,85,FC,60,20,67,82,4C, A3 
eASı 830 DATA F6,A6,10,35,C9,FF,FO,31, B4 
BASS 840 DATA 24,0F,30,20,84,49,38,E9, AD 
OARl 850 DATA 7F,AA,A9,9E,BS,FB,A9,AQ, 73 
oARS 8560 DATA 85,FC,Ad,FF,CA,F®,09,20, EE 
OABl 870 DATA S2,82,B1,FB,10,F9,30,F4, DB 
ORBS 880 DATA 20,52,82,B1,FB,30,06,20, 5® 
BACI 890 DATA 47,AB,4C,80,82,29,7F,A4, BF 
BACS 922 DATA 49,4C,47,AB,20,73,00.C9. 7E 
eADı S10 DATA 33,F0,34,C9,94,F®,40,.C9, 2B 
eADS 920 DAIA 95,F0,29,C9,F4,B0,04,E3, 65 
OGAEL 930 DATA CB,B0,06,20,79,00,4C,E7, DF 
ORES 940 DAIA A7,OR,AA,BD,47,3E,80,00, FO 
OAFl 950 DATA 82,B0,48,9E,80,01,82,20, BE 
OAFS S6B DATA 73,00,20,00,00,A2,E0,8E, 43 
0B01 970 DATA 25,99,00,DF,A9,01,0C,A9, 88 
0B03 9380 DATA 08,85,0n,20,73,00,20,FB, 01 
0B11 SS DATA 82,20,6F,E1,4C,B8,82,20, ES 


BBFS 320 DATA 20,42,59,28,41,4E,54,4F, OF | 8B19 1002 DATA 73,00,20,07,83,20,59,E1, 66 
0301 338 DATA 4E,20,4C,45,48,45,52,42, 48 | OB21 1010 DAIA 4C,B8,82,D0,0D,AE,6E,SD, 77 
0308 340 DATA 41,55,45,52,00,A9,A1,A2, 36 | 08B23 1029 DATA CA,FO,07,A9,01,A2,87,R0d, 7F 
0311 350 DATA 82,80,08,03,8E,09,03,A9, DS | 0B31 1038 DATA ADB,OC,A9,00,20,BD,FF,20, 7E 
0319 368 DATA AB,A2,81,8D0,04,03,8E,05, 87 | 0833 1040 DATA F6,BE,AE,SE,SD,AB,00,20, 85 
0321 378 DATA 03,A9,61,A2,82,80,06,03, ı2 OB41 1058 DATA BA,FF,20,06,E2,20,35,83, 49 
0323 380 DATA BE,07,03,A9,BE,RA2,35,8D0, 85 | 8B493 10860 DATA 20,28,83,86,BA,20,28,83, 34 
0331 330 DAIA 0A,03,8E,0B,03,A9,n3,A2, ES | 0B51 10978 DATA 85,B9,60,20,79,00,C9,2C, 22 


09333 408 DATA 81,80,00,03,BE,21,03,A0, Ei 0B5S 1088 DATA F9,03,68,68,60,4C,F1,B7, 3A 


0341 41@ DATA 20,8C,E5,98,8C,85,38,8C, D4 BOB61 10892 DATA 20,SE,AD,20,43,B6,4C,BD, 8B 
8949 420 DATA 8B,98,8C,6F,3D,8C,41,3D, C5 0B53 11088 DATA FF,20,80,95,28,B7,84,20, A4 
0351 438 DATA 8C,3E,9D0,8C,3F,9D,8C,38, 55 8571 1118 DATA AS,84,20,2A,88,20,7A,35, 65 
0359 448 DATA SD,8C,39,9D,8C,37,3D,8C, 13 08573 1128 DATA 4C,3E,83,08,49,00,8D,72, 4C 
8361 45® DATA 3C,9D0,8C,3D,90,8C,3B,3D, SD OB81 1138 DATA 3D,28,F0,09,20,80,95,20, 63 
0963 458 DATA 8C,42,9D,8C,44,3D0,8C,5F, 2F 0B8S 1148 DATA B7,84,4C,2A,88,60,20,8D, 10 
0371 470 DAIA 3D,8C,72,90,C8,8C,49,3D, C5 0BS1 1158 DATA SS,BC,0A,CA,80,0B,CA,BE, 07 
08373 488 DATA BC,36,3D,8C,43,3D,8C,45, 54 8B33 1168 DATA OC,CA,AG,64,8E,35,9D,20, 5A 
8981 498 DATA SD,AB,08,8C,3A,90D,A2,C8, EF OBR1I 1178 DATA FD,AE,20,8E,AD,A2,0D0,ADd, 4A 
09383 508 DATA BC,89,9D,Ad,F®,8C,8E,S8B, 5A OBAS 11898 DATA CA,20,D0D4,BB,20,FD,AE,20, 74 
0331 518 DAIA 4C,FD,8E,48,A5,3A,C3,03, 66 @OBBl 1198 DATA SE,AD,A2,17,A0,CA,20,04, SE 
093393 520 DATA F,03,4C,D5S,F1,8R,48,38, 7A OBBS 1298 DATA BB,280,FD,AE,20,9E,AD,A2, 76 
o3A1 538 DATA 48,A4,C6,F®,0F,AD,77,02, 52 OBC1 1218 DATA 20,A2B,CA,20,04,BB,20,FD, 46 
o9A3 548 DATA 38,E9,5F,D0,07,85,C6,20, 07 8BCS 1228 DATA AE,280,9E,AD,A2,05,AB,CA, Fı1 
03B1 SS® DATA 42,F1,FO,FB,68,AB8,68,AA, C5 8BD1 12328 DATA 20,D4,BB,20,FD,AE,20,9E, B8 
83B3 s68 DATA 4C,D1,F1,AD,80,22,C9,01, ıı ©EDS 12408 DATA AD,46,66,A5,61,48,A2,12, DI 
asc1 578 DATA DO,09,A5,CB,C9,03,D0,03, 32 OBE1 1258 DATA AB,CA,20,04,BB,20,A6,84, DF 
83C3 SBd DATA 4C,4A,89,4C,48,EB,380,03, Cı BBES 1268 DATA 68,F8,03,4C,B6,8D,60,20, 393 
83D1 530 DATA 20,56,85,4C,8B,E3,A6,7A, D7 BOBF1 1278 DATA 80,95,20,B7,84,20,FD,AE, 14 
83D3 600 DATA AB,04,84,0F,BD,00,02,C3, 086.| BOBF3 1288 DATA 20,3E,AD,20,A3,B6,8D0,00, 89 
O3E1 618 DATA FF,FO,4D,C9,290,F0,493,85, 88 BCB1 1298 DATA CA,86,F9,84,FA,20,A6,84, B3 
09E3 622 DATA 08,09,22,F0,66,24,8F,70, 54 2C8S 13088 DATA 4C,BA,93,20,39E,B7,E0,01, CB 
osF1 630 DAIA 3F,C9,3F,D8,04,AS,99,D2, 0B oC11 1318 DATA 32,20,02,27,8E,ES,38,A9, BO 
o9F3 640 DATA 37,C9,21,D8,04,A9,85,D®, DI 8C19 1328 DATA C8,20,40,85,20,7A,95,20, 7E 
oADı1 658 DATA 2F,C9,30,938,04,C3,3C,38, EF ec21 1338 DATA SE,B7,8A,0A,0A,0A,0A,85, EC 
oRB3 660 DATA 27,84,71,A0,00,84,0B,86, 77 ec23 1348 DATA 02,20,F1,B7,8A,05,02,4C, 57 
orl1 670 DATA 7A,A9,9E,85,FB,A9,AB,85, 57 0C31 1358 DATA 6B,85,8E,E5,98,20,56,85, DB 
or13 688 DATA FC,4C,F5,81,E8,28,52,82, Ba 8C33 1368 DATA 4C,16,84,20,3B,85,20,F1, 7F 
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83,20,7A,35,20,9E,B7,8E, 
86,02,8A,n2,07,20,60,85, 
20,7A,35,20,9E,B7,BE,21, 
D2,20,7A,95,20,3E,B7,8E, 
20,00,60,20,FD,AE,20,EB, 
B7,A4,14,A5,15,C0,40,E9, 
01,B0,40,A5,15,60,20,FD, 
AE,20,9E,AD,4C,F7,B7,20, 
F1,B7,E0,28,B0,20,86,F7, 
20,F1,B7,E0,C8,B0,24,86, 
F8,86,FC,20,F1,B7,8N,18, 
65,F7,C9,28,B0,15,E8,86, 
F9,20,F1,B7,84,18,65,F8, 
C9,C8,B0,07,E8,86,FA,86, 
FB,60,60,4C,48,B2,20,8D, 
95,20,B7,84,20,FD,AE,20, 
8D0,95,4C,C6,84,20,8B, 84, 
20,FD,AE,20,80,95,4C,D5, 
84,n2,01,0C,N2,00,20,79, 
00,F0,03,20,F1,B7,8E,42, 
39,60,8C,2A,30,8D,2B,9D, 
BE,2C,3D,A6,64,8E,2D,3D, 
60,8C,2E,3D,8D,?F,39D,8E, 
30,3D,A6,64,8E,31,3D,60, 
8C,32,90,80,33,30,8E,34, 
9D,A6G,64,8E,35,90,60,08, 
A2,00,86,03,28,F0,16,20, 
9E,B7,86,03,20,79,00,FD, 
0C,20,4B,84,A6,15,20,79, 
00,D0,14,CA,0C,A2,DF,e0, 
91,8B,45,03,91,FB,C8,D®, 
FB,E6,FC,CA,D®,F6,60,86, 
06,43,00,80,42,399,20,54, 
84,20,E5,99,C6,FA,F®,05, 
E6,F8,4C,1E,85,AS,FC,85, 
F8,AS,FB,85,FA,C6,F9,F®, 
DD,E6,F7,4C,1E,85,49,D8, 
8D,E5,38,80,16,D®,8D,89, 
SD,R9,94,80,00,DD,A9,3B, 
8D,11,D0,A9,3D,8D,18,D0, 
60,A9,1B,80,11,D0,49,15, 
8D,18,08,49,397,8D,00,DD, 
A3,C8,80,16,00,60,A2,CB, 
B6,FC,A2,E8,86,FB,A2,04, 
AB,18,31,FB,C8,D®,FB,EB, 
FC,CA,D®,F6,68,F0,17,20, 
4E,84,A6,15,20,79,00,FD, 
OF,86,06,20,54,84,49,02, 
8D0,42,39,4C,1E,85,A2,DF, 
20,8C,88,B1,FB,49,FF,31, 
FB,20,3C,8B,4C,A0,85,20, 
4E,84,45,15,85,04,20,4B, 
84,A4,15,A6,04,20,79,00, 
FO,3E,86,04,84,05,20,54, 
84,49,01,8D0,42,99,A5,04, 
85,06,20,E5,99,85,03,CE, 
42,99,A5,05,85,06,20,ES, 
99,C6,FA,F0,05,E6,F8,4C, 
C6,85,A5,FC,85,F8,A5,FB, 
85,FA,C6,F9,F0,05,E6,F7, 
4C,C6,85,60,A2,E®,AD,nD, 
CA,88,84,FE,20,8C,8B,n9, 
40,85, FD,B1,FB,91,FD,CB, 
D®O,F9,E6,FC,E6,FE,CA,D®, 
F2,4C,63,99,AD,ES,98,D®, 
DB,A2,03,86,FC,A2,C5,66, 
FE,A2,E8,86, FB,86,FD,n2, 
04,A0,18,B1,FB,31,FD,C8, 
D®,F9,E6,FC,E6,FE,CA,D®, 
F2,60,20,8B,84,20,A6,84, 
20,77,8B,86,64,A6,4D,20, 
D5,84,20,D0,86,20,1D,38, 
AD,30,3D,85,4D,AD,31,3D, 
85,4E,20,1D,38,AD,34,9D, 
85,4D,AD,35,30D,85,4E,20, 
24,87,F0,1A,20,1A,87,84, 
4B,85,4C,4C,52,86,20,1D, 
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S8,AD,2E,3D,85,4B,AD,?F, 
30,85,4C,28,1D,38,AD,32, 
9D,85,4B,AD,33,3D,85,4C, 
20,31,87,90,E1,60,20,88B, 
84,20,A6,84,20,77,8B,8E, 
01,CA,A6,4D,8E,00,CA,20, 
D2,86,20,10,38,20,31,87, 
30,F8,20,24,87,F0,DE,2®, 
1A,87,84,4B,85,4C,AD,00, 
CA,85,4D,AD,01,CA,85,4E, 
YC,AF,86,AD,2E,3D,38,ED, 
PA,SD,AD,2F,9D,ED,2B,3D, 
20,FD,86,8C,52,9D,8D,53, 
SD,AD,30,3D,38,ED,2C,3D, 
AD,31,3D,ED,2D,3D,20,FD, 
86,8C,54,390D,8D,55,3D,60, 
OR,A9,00,2R,On,AA,BD,7B, 
9D,AB,BD,7C,3D,60,20,94, 
84,20,19,86,8E,42,39,20, 
A1,86,4C,56,87,18,6D,52, 
3D,AB,84,60,53,3D,69,45, 
4B,A6,4C,EC,2F,9D,D0,03, 
CD,2E,3D,60,A4,4E,A5,4D, 
CC,31,3D,00,05,CD,30,3D, 
FO,F1,18,60,54,90,85,4D,, 
98,60,55,30,85,4E,18,60, 
20,34,84,20,19,86,20,D0, 
86,49,01,8D,03,CA,AD,2n, 
SD,8D,OA,CA,AD,2B,3D,8D, 
OB,CA,AD,44,3D,8D,06,CA, 
AD,45,3D,80,87,CA,AD,07, 
CA,F0,7D,CE,07,CA,AD,42, 
3D,80,04,CA,AD,43,3D,8D, 
05,CA,A2,03,BD,32,3D,3D, 
00,CA,CA,10,F7,20,77,88B, 
A9,A0,80,25,99,20,58,88B, 
8D,42,99,49,E0,80,25,39, 
A2,03,BD,08,CA,35,4B,CA, 
10,F8,20,E4,34,A2,03,BS, 
4B,3D,00,CA,CA,10,F8,AD, 
ZA,SD,AC,2B,3D,CD,2E,SD, 
DO,05,CC,2F,9D,F®,11,18, 
6D,52,3D,8D,2A,3D,38,6D, 


53,3D,8D,2B,3D,4C,32,87, 
AD,OA,CA,8D,2A,SD,AD,0B, 
CA,8D,2B,3D,20,0E,35,20, 
82,35,28,05,84,4C,73,87, 
AD,2C,3D,AC,2D,3D,CD,30, 
9D,08,85,CC,31,9D,Fo,24, 
18,6D,54,3D,8D,2C,90,s8, 
6D,55,3D,80,2D,3D,18,AD, 
056,CA,6D,44,9D,8D,06,Cn, 
AD,07,CA,6D,45,39D,8D, 07, 
CA,4C,73,87,60,AC,72,9D, 
AD,2A,SD,39,73,90,AD,2B, 
90,C8,39,73,3D,AD,2C,SD, 
C8,39,73,30,C8,AD,2D,sD, 
99,73,90,C8,8C,72,30,C0, 
08,D0,09,89,72,90,39,29, 
SD,88,D0,F7,AD,7A,39D,80D, 
76,30,AD,73,9D,8D,75,3D, 
AD,78,3D,8D, 74,3D,AD,77, 
3D,8D,73,3D,A9,04,80D,72, 
9D,00,06,20,8B,84,20,A6, 
84,46,06,A2,01,8E,52,3D, 
8BE,S54,3D,CA,8E,53,3D,8E, 
55,3D,20,77,8B,AD,2E,3D, 
38,E5,4B,85,04,AD,2F,SD, 
ES,4C,85,05,10,0B,A2,FF, 
8E,52,3D,8E,53,3D,20,BS, 
89,AD,30,30,38,ES5,4D,85, 
02,AD,31,90,E5,4E,AA,1®, 
16,A®,FF,8C,54,9D,80,55, 
30,493, FF,AA,AS,02,49, FF; 
AB,CB,B4,02,00,01,E8,86, 
03,AR6,02,45,03,E4,04,00, 
07,C5,05,00,03,4C,D9,89, 


ı 


AE,2A,3D,AD,2B,3D,EC,2E, 
3D,D2,08,CD,2F,SD,D0,03, 
4C,C7,89,AE,2C,9D,AD,2D, 
3D,EC,30,30,D0,08,CD,31, 
SD,D0,03,4C,00,89,A6,04, 
AS,05,E4,02,E5,03,B0,33, 
20,8B,89,AD,53,90,10,03, 
20,B5,89,15,4C,48,A5,4B, 
48,06,06,69,00,85,4B,90, 
02,E6,4C,20,1D,98,20,E3, 
89,68,6D,53,90,85,4B,68, 
6D0,53,90,85,4C,20,F9,89, 
4C,20,89,R6,02,A4,03,#5, 
04,86,04,A6,05,84,05,85, 
02,86,03,20,88,89,AD,55, 
9D,10,03,20,B5,89,AS,4E, 
48,A5,4D,48,06,06,69,00, 
85,4D,90,02,E6,4E,20,1D, 
9S8,20,E9,89,68,6D,55,3D, 
85,4D,68,6D,55,30,85,4E, 
20,17,8N,4C,63,89,A2,00, 
86,F7,86,F8,86,F3,86, Fan, 
AD,20,06,04,26,05,26,F9, 
26,FA,38,A5,F9,ES,02,An, 
AS,FA,ES,03,30,06,86,F3s, 
85,FA,E6,04,88,D0,E3,60, 
AS,04,49,FF,18,69,01,85, 
04,A5,05,49,FF,69,00,85, 
05,60,20,1D,38,20,F9,89, 
4C,C7,89,20,10,38,20,17, 
BA,4C,D®,89,20,1D0,38,28, 
F9,89,A6,4C,A5S,4B,20,25, 
BA,4C,D9,89,A5,F7,18,65, 
04,85,F7,A5,F8,65,05,85, 
F8,85,06,50,A6,4E,A5,4D, 
EC,31,9D,08,05,CD,30,3n, 
F0,00,18,60,54,9D,85,4D, 
8A,6D0,55,90,85,4E,60,68, 
68,60, A6,4C,AS,4B,EC,DF, 
3D,D2,05,CD,2E,3D,F®,Er, 
18,6D,52,9D,85,4B,8A,6D,- 
53,9D,85,4C,60,20,8D,35, 
20,B7,84,20,A6,84,8A,RAE, 
ES,98,30,02,29,01,29,03, 
85,02,20,77,88,20,68,58, 
C5,02,D0,01,60,A6,22,8£, 
42,99,85,05,20,19,86,20, 
82,98,A2,A®,8E,25,99,20, 
31,98,A9,34,78,85,01,#5S, 
4B,80,00,D0,AS,4C,03,FE, 
8D,01,D0,AS,4D,8D,02,00, 
A9,37,85,01,58,49,00,85, 
FD,A9,D0,85,FE,A2,00,86, 
03,R9,00,85,F7,85,F9,n6, 
03,50,73,88,85,F8,BD,74, 
8B,85,FA,A®,00,R9,34,78, 
85,01,84,04,B1,F7,85,48B, 
C8,B1,F7,AA,29,01,85,4C, 
8A,29,FE,85,06,C8,B1,F7, 
85,4D,A9,37,85,01,58,E6, 
4B,D0,02,E6,4C,20,1E,88, 
38,A5,4B,E9,02,85,4B,BD®, 
02,C6,4C,20,1E,8B,E6,4B, 
D0,02,E6,4C,E6,4D,20,1E, 
8B,C6,4D,C6,4D,2®,1E,BB, 


‚E6,4D,18,A5S,F7,69,03,85, 


F7,AB,AS,F8,69,00,85,FB8, 
C4H,FD,ES,FE,990,9D,AS,FA, 
85,FE,A4,F9,84,FD,D®,08, 
A6,03,D0D,74,8B,08,01,60, 
AS,03,49,02,85,03,4C,BE, 
BA,AS,84,C5,06,F0,3F,A9, 
AB,8D0,25,39,20,91,398,A5S, 
AB,CS,05,08,31,A9,E0,6D, 
25,99,20,82,38,A0,00,19, 
34,78,85,01,A5,4B,91,F9, 
E8,AS,04,49,02,05,4C,31, 
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F9,C8,AS,4D,31,F9,A9,37, 
85,01,58,18,AS,F9,69,03, 
85,F9,90,02,E6,FA,E6,04, 
E6,04,50,49,04,80,42,39, 
20,91.98,A5,A8,60,D0,D8, 
D8,D0,AC,2A,sD}AD,2B,3D, 
AE,2C,9D,84,4B,85,4C,86, 
4D,AE,2D,30,86,4E,60,78, 
A9,34,85,01,86,FC,n2,4®, 
86,FB,A2,20,0,C0,60,C8, 
DO,FC,E6,FC,CA,D®,F7,68, 
68,4C,63,39,08,A0,00,n9, 
EO,84,14,85,15,28,F0,0E, 
20,9E,B7,8E,48,8C,20,79, 
00,F0,03,20,4B,84,n9,04, 
85,03,n9,64,85,04,20,C7, 
8C,A2,03,BD,42,8C,20,n8, 
FF,CA,10,F7,n9,19,85,03, 
n9,28,85,04,n2,04,BD,46, 
8C,20,AB,FF,CA,10,F7,n®, 
07,78,49,34,85,01,Bl,14, 
99,F7,00,88,10,F8,R9,37, 
85,01,58,N2,08,86,02,ne, 
07,16,F7,6A,CA,10,Fn,20. 
AB,FF,C6,02,00,F1,A5,14, 
18,69,08,85,14,90,02,E6, 
15,C6,04,D0,CA,A3,0D,20, 
AB,FF,A9,0R,20,AB,FF,20, 
El,FF,F0,04,C6,03,D0,RB, 
A9,1B,20,AB,FF,A9,32,20, 
AB,FF,4C,AE,FF,0D,08,41, 
1B,01,40,05,67,1B,20,07, 
83,20,19,86,12,00,n0,nD, 
86,02,84,03,A2,40,AQ,BF, 
AS,02,C5,01,20,D8,FF,E6, 
01,00,10,A9,E0,48,20,F8, 
82,68,AB,n9,00,85,B3,An, 
20,05,FF,BO,65,60,A2,6F, 
20,C0,8C,20,79,00,D0,24, 
20,AE,FF,AS,03,20,B4,FF, 
A3,6F,20,36,FF,AS,00,20, 
D2,FF,20,AS,FF,A4,30,F®, 
F6,20,AB,FF,4C,D7,AA,2®, 
79,00,F@,14,20,9E,AD,20, 
A3,B6,AA,F0,0B,A0,00,B1, 
22,20,AB,FF,C8,CA,D®,F7, 
4C,AE,FF,86,04,20,4F,BD, 
86,03,20,F6,8E,A9,00,85, 
30,A5,03,20,B1,FF,AS,04, 
20,93,FF,24,90,30,01,60, 
A9,05,4C,F9,E0,A2,FO,20, 
C0,8C,A9,24,20,AB,FF,20, 
79,00,F0,05,A9,3A,20,AB, 
FF,20,A4,8C,A5,03,20,B4, 
FF,A9,60,20,96,FF,A2,05, 
0C,n2,03,20,E1,FF,FO,o6, 
20,2A,8D,CA,D®,FS,AA,20, 
D7,AA,20,24,8D0,20,CD,BD, 
A9,20,20,D2,FF,20,2n,8D, 
AA,F®,DE,D®,FS,20,n5,FF, 
A4,930,F0,34,68,68,45,03, 
20,B1,FF,A9,E0,20,93,FF, 
A9,6F,85,04,20,CA,8C,20, 
D7,AA,4C,85,8C,19,09,4C, 
3B,A4,A2,08,BO,12,20,6B, 
A9,AS,15,D0,F®,AS,14,C9, 
08,30,ER,C9,10,B0,E6,An, 
60,20,3E,B7,E0,01,F0,08, 
E®,04,90,D9,E0,10,B0,0S, 
8E,6E,9D,60,20,F8,82,R0, 
©1,Bl,2B,F0,03,20,37,8D, 
AS,2D,38,E9,02,AA,AS,2E, 
E9,00,A8,A9,08,85,B3,HC, 
75,E1,R9,01,AB,S1,2B,20, 
33,A5,A5,22,18,69,02,85, 
2D,AS,23,69,00,85,2E,60, 
20,97,80,20,60,A6,4C,74, 
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15E1 
15E3 
ı15SF1 
15F3 
1601 
1603 
1611 
1619 
1621 
1629 
1631 
1639 
1641 
1649 
1651 
1658 
1661 
1663 
1671 
1679 
‚1681 
1688 
1691 
1699 
16R1 
16R3 
16B1 
16B3 
16C1 
1609 
16D1 
1603 


16E1, 


16E3 
16F1 
16F3 
1701 
17083 
1711 
17219 
rat 
1729 
1731 
47,39 
1741 
1749 
1751 
1759 
1761 
1769 
1771 
1773 


1781, 


1783 
1791 
1799 
17A1 
17A3 
17B1 
17B3 
17C1 
17C9 
1701 
17D9 
17E1 
17ES 
17F1 
17F9 
1801 
1803 
1811 
1819 
1821 
1829 
1831 
1839 
1841 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


x DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


A4,A9,01,85,B2,20,04,BE, 
AS,B2,38,E3,01,390,07,00, 
0B,80,72,9D0,85,B2,20,2A, 
88,4C,03,80,C6,B2,49,08, 
AB,CA,20,A2,BB,A9,12,AB, 
CA,20,67,B8,A2,00,A0d,CA, 
20,04,BB,A9,05,A0,CA,2D, 
SB,BC,F0,C9,380,C7,A0,04, 
B3,05,CA,39,90,CA,88,10, 
F7,20,04,8E,4C,2A,88,#A9, 
00,AB,CA,20,A2,BB,20,64, 
E2,A9,0D,A®,CA,20,28,Bn, 
20,BF,B1,45,65,18,6D,®A, 
CA,8D,2A,3D0,A5,64,6D,0B, 
CA,8D,2B,30,18,69,40,30, 
EA,AS,00,Ad,CA,20,A2,BB, 
290,6B,E2,A9,17,n8,CA,20, 
28,BA,20,BF,B1,A5,65,18, 
6D,0C,CA,8D,2C,9D,A5,64, 
60,35,30,80,2D,9D,18,689, 
40,10,04,49,02,85,B2,60, 
08,A2,12,28,F0,16,20,3E, 
B7,08,84,D0,03,4C,00,BF, 
A2,12,28,F0,97,20,F1,B7, 
EO,19,B0,32,8A,0A,0n,on, 
69,31,8D,81,9D,78,A9,7F, 
8D,0D,DC,A9,AE,8D,14,03, 
A9S,8E,8D,15,03,A2,01,8E, 
1A,D0,8E,71,9D,CA,8E,6C, 
SD,RD,82,30,8D,12,D09,43, 
B1,8D,6D,90,58,69,4C,48, 
B2,A9,01,8D,19,D®,AE,6C, 
SD,BD,81,30,8D,12,D0,BD, 
89,9D,8D0,16,D8,BD,87,3D, 
8D,00,D0D,BD,85,3D,8D,18, 
D2,80,83,30,8D,11,D0,8#A, 
49,01,8D0,6C,3D,CE,71,3D, 
F0,03,4C,81,EA,AD,6D,3D, 
18,69,B1,8D0,6D,3D,AD, 71, 
3D,69,01,80,71,9D,4C,31, 
EA,AD,15,03,C9,EA,F0,37, 
A3,00,08,78,49,31,8D,14, 
03,A3,EA,8D,15,03,A9,FD, 
8D,1A,D2,49,81,8D,0D,DC, 
58,28,F®,0F,20,F1,B7,8n, 
FO,29,AD,89,90,8D,16,D®, 
4C,46,85,40,56,85,18,65, 
04,85,04,30,02,E6,05,60, 
18,65,02,85,02,B0,02,C6, 
03,60,BD,D7,9E,85,04,BD, 
D8,9E,85,05,60,BD,D7,SE, 
85,02,8D,08,9E,85,03,68, 
BD,3B,9F,85,04,BD,3C,9F, 
85,05,60,BD,3B,9F,85,02, 
BD,3C,9F,85,983,60,CE,67, 
SD,CE,67,9D,A0,08,AE,67, 
SD,20,3F,8F,8A,48,20,C1, 
BF,6B,AA,CA,CA,30,21,EC, 
66,90,90,1C,8A,48,20,3F, 
BF,A9S,01,20,2B,8F,EB,EB, 
20,4A,8F,A9,FA,20,35,8F, 
20,F2,8F,68,AA,4C,76,8F, 
E8,E8,20,4A,8F,AS,FA,20, 
35,8F,20,E0,91,98,91,02, 
28,1F,32,CA,D®,F7,20,B9, 
91,4C,71,8F,A9,07,8D,61, 
SD,AS,04,85,02,45,05,85, 
03,20,E2,8F,CE,61,9D,F®, 
0B,A5,04,D0,02,C6,05,C6, 
04,4C,C6,8F,60,20,E0,31, 
81,02,C8,91,02,88,20,1F, 
92,CA,D®,F4,60,290,01,91, 
B1,04,91,02,20,1F,32,n9, 
08,20,2B,8F,CA,D®,F1,60, 


AD,00,AE,66,90,20,55,8F,' 


BA,4B,20,4A,30,68,AA,EB, 
EB,EC,57,3D,B®,15,BA,48, 
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1849 
1851 
1859 
1861 
1869 
1871 
1879 
1881 
1889 
18931 
1899 
18A1 
18A3 
18B1 
1889 
18C1 
18C9 
18D1 
18D3 
1BE1 
1BE3 
18F1 
18FS 
1901 
1993 
1911 
1919 
1921 
1929 
19331 
1939 
1941 
1949 
1951 
1359 
1961 
1969 
1971 
1973 
1981 
1383 
1391 
1999 
19A1l 
19A3 
19B1 
19B3 
19C1 
19C3 
19D1 
19D3 
19E1 
19E9 
19F1 
2969 
1ADl 
1A09 
1A1ll 
1A19 
ı1n21 
1A23 
1A3l 
1A33 
1A4l 
1A43 
1AS1 
1A59 
1A6l 
1A63 
ıA71 
173 
1AB1 
1A83 
1A31 
1A33 
ı1AAl 
1AA3 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


20,55,8F,CA,CA,20,60,8F, 
20,22,32,20,7C,30,68,An, 
4C,0R,30,CA,Ch,20,60,8F, 
20,22,32,20,E0,931,98,31, 
02,20,1F,32,CA,D0,F7,20, 
B9,91,4C,05,90,49,07,8D, 
61,30,A5,04,85,02,45,05, 
85,03,20,569,90,CE,61,9D, 
F0,09,E6,04,00,EC,E6,05, 
4C,4F,90,60,20,E®0,31,A0, 
01,B1,02,88,91,02,C8,290, 
1F,92,CA,DO,F4,88,60,20, 
D1,31,B1,04,91,02,20,1F, 
92,R9,08,20,2B,8F,CA,Do, 
F1,60,18,00,AE,66,39D,BD, 
09,3F,85,04,BD,On,9F,B5, 
05,49,08,80,61,9D,BA,4B, 
AS,04,85,02,45,05,85,093, 
20,CC,90,A45,04,D0,02,C6, 
05,C6,04,CE,61,9D,D0,EB, 
68,AA,EB,E8,EC,67,3D,90, 
CE,28,B9,91,4C,8F,30,20, 
F9,31,18,33,02,08,A9,F8, 
20,35,8F,28,CA,D®,F4,60, 
AD,00,AE,66,30,20,55,8F, 
A3,08,80,61,3D,84,48,AS, 
04,85,02,45,05,85,03,20, 
11,91,E6,04,D0,02,E6,05, 
CE,61,3D,D9,EA,68,AA,EB, 
EB,EC,67,390,90,D7,20,5B9, 
91,4C,DD,30,28,E0,31,18, 
B1,02,6A,91,22,08,20,1F, 
92,28,CA,D0,F3,60,8F,30, 
DD,30,05,30,6B,BF,20,3E, 
B7,84,29,03,0R,An,BD,23, 
31,80,84,91,BD,24,91,8D, 
B5,31,49,00,8D,69,39D,20, 
F1,B7,E0,28,B0,6B,8E,6n, 
SD,8A,0A,0n,0On,2E,69,3D, 
8D,68,3D,20,F1,B7,EC,6n,' 
3D,30,56,E0,28,B®,52,8E, 
6B,3D,20,F1,B7,E®,19,BD, 
48,BA,0R,80,66,9D,20,F1, 
B7,E®,19,B8,3C,EB,8n,on, 
8D,67,3D,A2,00,8E,64,3D, 
A2,01,8E,63,90,20,79,00, 
F@,17,20,4B,84,80,63,5D, 
8D,64,3D,00,63,9D,F0,SB, 
AD,64,3D,C0,41,E9,01,B0, 
10,AD,66,3D,CD,67,30,B®, 
08,78,49,34,85,01,4C,00, 
00,4C,4B,B2,AD,63,39D,D®, 
03,CE,64,9D,CE,63,9D,AD, 
63,3D,0D,64,90,D®,2C,58, 
68,4C,63,99,A5,04,18,6D, 
68,30,85,04,A5,05,6D,69, 
9D,85,05,A5,02,18,6D,68, 
9D,85,02,45,03,60,69,3D, 
85,03,AD,6B,3D,38,ED,6n, 
SD,AA,E8,60,49,27,38,ED, 
6B,30,A2,00,BE,69,9D,0n, 
OA,OA,2E,569,90,80,68,3D, 
AS,02,38,ED,68,30,85,®0, 
AS,03,ED,69,90,85,03,4C, 
EF,31,49,08,0C,49,07,18, 
65,02,85,02,45,03,69,00, 
85,03,60,20,53,E4,20,1B, 
ES,A9,00,85,37,A9,A0,85, 
38,20, FD,8BE,28,30,E4,n9, 
00,80,04,80,38,20,72,80, 
4C,74,A4,20,8D,35,8C,3n, 
SD,80,38,3D,8E,3C,3D,A6, 
64,8E,3D,30,68,20,80,35, 
8C,3E,3D,8D,3F,30,8E,4®, 
3D,A6,64,8E,41,3D,20,7A, 
95,20,8D,35,8C,36,3D,8D, 
37,3D,8E,38,3D,A6,64,6E, 


39,3D,60,20,3E,B7,E®,r1, 
BQO,1D,8E,43,3D,2@,F1,B7, 
BE,42,9D,20,7A,35,20,3E, 
B7,EO,65,B®,0A,8E,45,3D, 
20,F1,B7,8E,44,9D,60,4C, 
48,B2,20,3E,B7,8E,85,38, 
20,F1,B7,8E,8B,98,20,#3, 
84,E0,01,19,00,2A,An,BD, 
7F,3D,8D0,8E,38,60,20,SE, 
AD,24,0D,10,18,20,A3,B6, 
85,02,4A,8D,6F,3D,A®,00, 
C4,02,F0,38,B1,22,39,00, 
CB,CB,4C,DD,92,20,#A1,B7, 
EO,81,B0,BB,8E,6F,39D,20, 
7A,935,20,39E,B7,E0,80,8B0, 
AE,BA,0A,85,02,20,7A,55, 
20,80,95,A6,02,98,9D,00, 
CB,E8,A5,65,9D,00,CB,E8, 
86,02,D0,E9,60,20,3E,B7, 
EO,28,B0,8B,8E,2A,SD,20, 
F1,B7,E0,C8,30,03,4C,48, 
B2,BE,2C,9D,28,FD,AE,20, 
SE,AD,20,43,86,85,04,9, 
EO,85,06,A9,D0,80,08,C#, 
A9,90,80,42,99,8D,03,CA, 
85,05,A4,05,C4,04,F0,64, 
B1,22,09,93,D0,06,20,1F, 
94,4C,B4,93,20,E3,93,B0, 
4E,0D,03,CA,85,F9,49,00, 
06,F9,2A,06,F3,2A,06,F9, 
PA,6D,08,CA,85,FA,AD,2n, 
9D,85,F7,AD,2C,9D,85,F8, 
AD,00,84,02,19,33,78,85, 
01,B1,F9,A2,37,86,01,58, 
85,03,20,E5,99,E6,F8,AS, 
F8,C9,CB,F®,08,E6,02,A4, 
02,C0,08,D®,DF,EE,2A,sD, 
AD,2A,9D,C9,28,B0,05,E6, 
05,4C,4F,33,60,49,D0,8D, 
08,CA,A9,00,80,01,CA,8D, 
03,CA,AC,01,CA,CC,00,Ca, 
F0,13,B1,F9;20,E3,93,B®, 
06,20,49,94,20,53,95,EE, 
01,Cn,4C,C7,93,60,AA,29, 
7F,C9,20,90,0F,Bn,29,80, 
4A,8D,09,CA,8n,29,3F,0D, 
09,CA,18,60,E®,13,F®,2B, 
EO,93,F0,12,E0,12,F0,38B, 
EO,92,F®,3R,E0,01,FD,2n, 
EO,02,F0,29,38,60,AD,ES, 
98,D0,07,49,93,20,D2,FF, 
38,60,19,00,85,03,20,02, 
85,38,60,19,00,8D,2A,SD, 
8D,2B,3D,80,2C,3D,8D,2D, 
90,60,A9,D8,0C,A9,D®,8D, 
08,CN,60,19,80,0C,A3,00, 
8D,03,CA,60,00,03,CA,AD, 
00,8C,02,CA,84,15,0n,26, 
15,0A,26,15,0A,26,15,85, 
14,A5,15,6D,08,CA,85,15, 
AD,44,9D,8D,06,CA,AD,4S, 
9D,8D,087,CA,20,77,8B,AC, 
02,CA,A9,33,78,85,01,8B1, 
14,A2,37,86,01,58,20,31, 
94,EE,02,CA,AC,02,CA,Co, 
08,00,E7,60,8D,0B,CA,AD, 
07,CA,F®,31,CE,07,CA,AD, 
0OB,CA,8D,0C,CA,A9,08,8D, 
OA,CA,AD,42,90,8D,04,Ca, 
AD,43,9D,80,05,CA,20,82, 
95,20,05,84,0E,0C,CA,2®, 
DE,94,CE,@A,CA,D®,FS,20, 
BE,35,4C,34,94,AD,06,CA, 
18,6D,44,9D,8D,06,CA,AD, 
07,CA,6D,45,3D,8D,907,Ca, 
60,R9,00,2A,80,09,CA,AD, 
85,CA,F®,11,CE,05,CA,AD, 
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83,CA,F0,03,20,1D,98,20, 
34,95,4C,E4,34,AD,@4,Ca, 
18,6D,42,9D,8D,04,CA,AD, 
05,CA,6D,43,3D,8D,05,Ca, 
69,AD,34,930,18,6D,40,3D, 
85,4D,AD,35,9D,6D,41,9D, 
85,4E,AD,32,9D,18,6D,3E, 
90,85,4B,AD,33,9D,6D,3F, 
3D,85,4C,60,68,68,60,45, 
4D,18,6D,38,390,85,4D,A5, 
4E,6D,39,30,85,4E,AS,4B, 
18,60,36,90,85,4B,A5,4C, 
6D,37,3D,85,4C,60,AD,oC, 
9D,18,6D,3C,9D,80,2C,3D, 
AD,2D,30,60,3D,3D,8D,2D, 
SD,AD,2A,SD,18,6D,3A,3D, 
8D,2A,SD,AD,2B,9D,6D,38B, 
9D,80,2B,30,60,20,73,00, 
FO,B2,4C,FD,AE,A4,4B,AS, 
4C,A6,4E,B6,64,A6,4D,60, 
20,9E,AD,20,BF,B1,A5,65, 
BD, 00,CA,AS,64,80,01,Ca, 
18,69,40,30,19,20,FD,AE, 
20,9E,AD,20,BF,B1l,A5,64, 
18,69,48,30,09,AC,00,CA, 
AD,®1,CA,AB,65,50,4C,48, 
B2,A9,00,85,00,20,73,00, 
C9,24,F0,46,C9,25,F0,49, 
C9,F4,F0,19,C9,F3,F0,0D, 
C9,E7,00,03,4C,57,96,20, 
79,00,4C,8D,AE,28,73,00, 
AD,6E,3D,10,12,20,73,00, 
20,80,95,20,87,84,20,F7, 
AE,20,77,88,20,68,BB,An, 
A9,00,86,63,85,62,R2,30, 
38,20,49,BC,4C,8D,AD,4C, 
4B,B2,A2,04,8N,N0,10,D0, 
06,A2,10,R9,01,R0,02,85, 
FD,84,FE,A9,00,85,FB,85, 
FC,20,73,00,CA,30,24,90, 
06,C9,41,90,1E,E9,07,38, 
E93,30,30,17,C5,FE,B0,13, 
A4,FD,06,FB,26,FC,88,D0, 
F9,65,FB,85,FB,30,DA,EB, 
FC,BO,D6,A6,FB,AS,FC,4C, 
FF,95,20,73,00,19,24,20, 
FF,AE,AD,6F,3D,C9,80,B0, 
13,0A,20,7D,B4,A0,00,B9, 
00,CB,31,62,C8,C4,61,D®, 
F6,4C,CA,B4,A2,17,4C0,37, 
A4,20,9E,B7,E®,28,B0,15, 
86,02,20,F1,87,E0,19,B0, 
8C,A4,02,18,20,F0,FF,e0, 
F7,AE,4C,9D,AN,4C,48,B2, 
20,9E,B7,8E,65,9D,8A,F®, 
SF,A9,B3,80,02,03,A9,56, 
80,03,03,4C,74,R4,20,60, 
AS,86,7A,84,7B,20,73,00, 
AR,F®,F3,A2,FF,86,3A,30, 
05,20,79,R5,4C,E1,A7,20, 
6B,A9,A5,14,18,6D,65,30, 
AA,AS,15,69,00,85,62,86, 
63,A2,90,38,20,49,BC,20, 
DF,BD,20,87,B4,20,A6,86, 
85,C6,AQ,FF,C8,B1,22,39, 
77,02,C4,C6,D0,F6,E6,C6, 
A9,20,39,78,02,4C,3F,A4, 
A9,83,80,02,03,A9,A4,8D, 
03,03,60,4C,39,AD,20,8B, 
B®O,A6,0D,FO,F6,85,49,84, 
4A,20,E4,FF,AA,FO,FA,48, 
A9,01,20,7D,B4,A0,00,31, 
49,68,91,62,45,62,08,31, 
49,45,63,C08,31,49,60,20, 
9E,B7,8A,29,03,0A,0n,BS, 
02,R2,00,84,05,B9,00,CB, 
85,03,B9,21,CB,85,04,A6, 
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02 ‚,BD,8R,97,F0,08,45,03, 
49.FF,AB.CB.84,03.BD,8B, 
"97.F0,08.AS.04.49.FF.AB, 
C8.84,04,BD,BC,97,AB,BD, 
8D.97.AA.B3.03.00,n4.05, 
39.00,CB,BS.03.99,01.CB, 
C8.C8.00.BF.60.00.01.00, 
00.01.00.01.00.01,01,00, 
01.00.01.01.,00,20,9E ,B7, 
BE.SF.30,20.79.00,F0.6B, 
20,38,84,8C,5R,3D,8D,5B. 
9D.8E,5E,3D,20,38,84.8C, 
5C.30.80.5D.390,8E,50,9D, 
CC.SA.3D.ED,5B,90,B0,15, 
AD.SA.3D.8D,5C,3D,8C,5n, 
SD.AD,SB.3D,AC,5D,3D,8D, 
SD.9D.8C.5B,39D,EC,SE,SD, 
B0.09,.AD.SE,3D,BE/SE,9D, 
80,60.30,AD,SC,3D,38,ED, 
SA,3D.80,5C,30,AD,SD,sD, 
ED.SB,3D,80.5D,9D,38, AD, 
60.30,ED.SE.3D,80,60,3D, 
EE,5C.3D.D00,03,EE,5D,3D, 
EE.60.30.60,20.80.35,20, 
B7.84.20.A6.B4.20,77.88B, 
AD.6F.3D.00,03.4C,82,38, 
8D.70.3D.A0.00.8C,62,3D, 
'Ad,03.83.4B.00.39,55,3D, 
88.10.F7.1B.AC.62,30,89, 
00.CB,FO,12,An,65,4B,85, 
4B.BA.10.03.A9,FF,OC.Ag, 
00.65.4C,85 .4C.18,89,01, 
CB.FO.11.AA,65.4D0.85.4D, 
BA.10,03.A9.FF.OC,A9.00, 
65.4E.85.4E.CB.CB.8C.62. 
90,20,31,38,CE,70,3D,D0, 
C2.A0,03.B9,55,30,99,4B, 
00.88,10.F7.60,n5.4B,28. 
00.85,FF.AS,4D.23.00.05. 
FF.D0.01.650,.A5.02.85.AB. 
AD.SF,30.FO.4HA.A4.4B.AS. 
4C.CC,5C.9D.ED,5D,30,B0, 
DB,A4,4D.AS,4E.CC,B0,9D, 
E3.00,B0.00,18.45.4B.48, 
6D.SA,9D.AA.AS.HC.4B.6D, 
5B,90,86,4B,85,4C,18,A5, 
4D.48.6D.SE.9D.AA,AS.4E. 
48,69,00,86.4D,85,H4E.28, 
E4.98.68.85,4HE,68,85.4D, 
68,85,4C.68,85,4B.60,A9, 
00.00,03.4C.36,9A,A4,4D, 
AS.4E.CO.C8,E3.00,BO,EE, 
AD.ES.98,10,03,4C,69,39, 
A4.4B.AS.4C,CO.4O.E9.01. 
BO.DC.AS,4D,29,FB,4R,un, 
AR,AS,4D,29,07,85,FF,nS, 
4B,29.F8,05,FF,7D,97,9E, 
85.FB.BD,98,9E,65,4C,69, 
EQ.B5,FC,AQ,00,R9,34,78, 
85,01.A5.4B,29,07,AA,BD, 
45.90.85, FF,31,FB,F0.02, 
A93.01.85,AB,A2,00,E0,04, 
FO,1C.AS,FF,EO,01.30.09, 
FO,10,51.FB,91.FB.4C,63, 
99.49. FF.31.FB,31,FB.4C, 
63.99, 11,FB,91,FB,A9,37, 
85.01.58,560,A4.4B,A5,uC. 
CO,AD,E9.00,B0,71,n5,4D, 
23. F8.4A.4A.AA,.AS,4D,29, 
07.70.97.9E.85,FB,A5.4B, 
23. FC.OA.AB,AD,25.39,7D. 
9B.9E,AA,38.65,FB.85,FB, 
90.01.E8,86,FC.AB,00,Rs, 
34.78.85.01.R5.4B.23,03, 
An,BD,4E,9D,85,FF,48, FF, 
31,FB,85,AB,AS,FF,31,FB, 
85,FF,AD,42,99,C9,04,BD, 
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11,48,8A,493,03,AA,68,CH, 
30,04, 0A,0RA,30,F93,05,FF, 
91,FB,A5,4B,29,83,49,03, 
AA,CA,30,06,46,AB,46,AB, 
90,F7,R9,37,85,01,58,60, 
AS,F8,29,F8,4A,4A,AA,AS, 
F8,29,07,70,97,9E,85,FD, 
AS,06,7D,38,39E,85,FE,#AS, 
F7 ,DA,DA,0A,30,03,E6,FE, 
18,65,FD,85,FD,30,02,E6, 
FE,A®,00,78,49,34,85,01, 
AE,42,39,E0,01,30,0B,F®, 
18,B1,FD,49,FF,S1,FD,4C, 
63,99,45,03,31,FD,4C,63, 
99,B1,FD,A2,37,86,01,58, 
60,A4,4B,A5,4C,C0,50,E9, 
00,B0,F5,A4,4D,AS,4E,CO, 
32,E93,00,B0,EB,AD,00,84, 
FC,A5,4D,29,FE,85,FB,0#, 
P6,FC,0A,26,FC,65,FB,85, 
FB,30,02,E6,FC,06,FB,06, 
FC,06,FB,26,FC,AS,4B,4n, 
18,65,FB,85,FB,AS,FC,69, 
84,2C,25,99,790,02,69,C2, 
85,FC,AS,4B,29,01,85,FF, 
AS,4D,29,01,0A,05,FF,AR, 
BD,DE,SA,85,FF,A2,0F,Bi, 
FB,DD,CE,9A,F0,04,CA,1®, 
F8,60,8A,25,FF,F0,02,#9, 
01,85,A8,BA,RE,42,399,E®, 
04,F®,EE,E8,01,90,07,F®, 
OF,45,FF,4C,C7,9A,AB,FF, 
85,FF,8NR,49,0F,25,FF,0C, 
05,FF,AA,BD,CE,SA,91,FB, 
60,20,7E,7C,E2,7B,61,FF, 
EC,5C,7F,E1,FB,62,FC,FE, 
AB,01,02,04,08,20,80,95, 
84,F7,85,F8,86,F9,A5,64, 
85,FA,20,FD,AE,20,3E,AD, 
A2,00,A0,CA,20,04,BB,20, 
49,B8,20,AA,B1,84,04,85, 
05,20,R6,84,A9,00,Ad,Ca, 
28,A2,BB,A9,BC,A9,B9,20, 
OF ,BB,A2,05,Ad,CA,20,D4, 
BB,AS,AB,A®B,AE,2@,0F,BB, 
C6,61,C6,61,20,F7,B7,84, 
FD,B5,FE,A9,05,A®,CA,2®, 
A2,BB,20,6B,E2,A2,0A,AD, 
CA,20,04,BB,99,05,AB,CA, 
20,n2,BB,20,64,E2,A2,®F, 
AB,CA,28,D4,BB,A9,FF,85, 
02,85,03,A2,04,BD,00,C#, 
SD, 1E,CA,A9,90,9D,23,CaA, 
CA,10,F2,85,06,85,07,20, 
07,3C,A9,1E,A®,CA,20,r2, 
BB,A9,0F,AB,CA,20,28,BA, 
A2,14,AB,CA,20,D4,BB,AS, 
?3,AQ,CA,20,n2,BB,A9,0n, 
ADB,CA,2O,28,BA,A9,14, AD, 
EA,20,50,B8,n2,14,A0,Ca, 
28,D4,BB,28,49,B8,20,AA, 
B1,84,04,85,05,A9,1E,AD®, 
CA, 28, A2,BB,A9,0A,AD,CA, 
20,28,BA,n2,19,A0,CA,20, 
D4,BB,A9,23,A8,CA,20,RA2, 
BB,A9,0F,AQ,CA,20,28,BA, 
A3,19,AB,Ch,20,67,B8,n2, 
23,Ad,CA,?0,04,BB,29,439, 
BS,28,AA,Bl,84,06,85,07, 
A2,04,BD,14,CA,SD,1E,CA, 
CA,18,F7,20,07,9C,E6,02, 
D®,22,E6,03,A4,02,45,03, 
C4,FD,ES,FE,B®,03,4C,6F, 
9B,60,R2,00,BD,A1,39C,28, 
E8,BD,A1,3C,E8,A8,AS,F7, 
28,D0,12,18,79,04,098,3D, 
AF,SC,AS,F8,73,85,00,3D, 


BO,SC,4C,39,9C,38,F9,04, DATA 50,92,AF,32,30,92,82,85, 
00,9D,AF,SC,AS,F8,F3,0S5, DATA 50,83,E2,9A,7B,8C,30,96, 
00,3D,5B9,SC,E0,08,30,CC, DAIA CB,32,32,8A,7E,36,A9,-8B, 
A2,008,BD,A93,9C,08,E8,BD, DATA 63,83,1A,33,9A,97,D1,SC, 


ae EEE NE EDER; DATA 62,32,13,97,3C,97,14,81, 
12,18,73,04,08,3D,8B7,3C, 
3 DATA 66,80,08,00,40,01,80,00, 
AS,FA,79,05,00,3D,B8,SC, 
lee ’ DATA CD,03,00,05,40,06,80,07, 
4C,6F,3C,38,F9,04,08,SD, 
D DATA C0,08,00,0N,40,0B,80,0C, 
B7,3C,AS,FA,F9,05,00,3D, 
er DATA CO,00,00,0F,40,10,80,11, 
B8,3C,E8,08,90,CC,A2,00, 
» DATA CD,12,00,14,40,15,80,16, 
86,62,BD,C1,3C,A8,BD,C2, 
s DATA C0,17,00,19,40,1A,80,1B, 
a a a DATA CO,1C,00,1E,40,1F,80,20 
B2,3C,85,4C,BD,8B9,3C,85 ‚1C,00,1E,10,1F,80,20, 
Be ee DATA C0,21,09,23,40,24,80,25, 
4D,BD,BA,SC,85,4E,28,1D, 7 DATA C0,26,06,E0,46,E1,86,E2, 
38,E6,602,E5,52,#6,62,Ed, DATA C6,E3,06,ES5,46,E6,86,E7, 
18,90,07,60,01,08,01,02, DATA C6.EB.06,ER.4B.EB.BB.EC. 
20.09 20 DE ,00 02:09:00; DATA C6,ED,06,EF,46,F0,86,F1, 
01,02,01,00,00,80,00,00, ; DATA C6,F2,06,F4,46,F5,86,F6, 
00,00,00,00,00,00,00,00, DATA C6,F7,06,F9,46,FA,86,FB, 
00,00,08,020,00,00,02,02, DATA C6,FC,06,FE,3F,E1,7F,Eo, 


04,00,06,02,00,04,02,06, 
04.04.06 06 .20.80.95.20. DATA BF,E3,FF,E4,3F,E6,7F,E7, 


DATA BF,EB,FF,E9,3F,EB,7F,EC, 
a DATA BF,ED,FF.EE,3F,F®,7F,Fl, 
eg > DATA BF,F2,FF,F3,3F,FS,7F,F6, 
Be DATA BF,F7,FF,FB,3F,FA,7F,FB, 

ea a se DATA BF,FC,FF,FD,3F,FF,00,E®, 
00,84,03,AD,08,CA,F®,2C, DATA 40,E1,80,E2,C0,E3,20,ES, 
CE,008,CA,A4,03,C4,02,F®, DATA 40,E6,80,E7,C0,E8,00,En, 
17,B1,22,C9,21,AD,42,9D, DATA 40,EB,80,EC,CO,ED,00,EF, 
AE,43,3D,80,04,CA,BE,05, DATA 40,F0,80,F1,C0,F2,00,F4, 
CA,20,DE,S4,E6,98,D0,E3, DATA 40,FS,80,F6,C0,F7,00,F9, 
20,0E,935,20,82,95,20,D5, DATA 40,FA,80,FB,CO,FC,00,FE, 
84,4C,F4,3C,60,00,00,00, DATA 00,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00, DATA 00,00,00,00,00,00,20,00, 
00,01,00,00,00,08,00,00, DAIA 00,00,00,00,00,00,00,00, 
00,20,00,021,00,00,01,00, DATA 00,00,00,00,00,00,00,00, 
ae a, DATA 00,00,00,00,00,00,00,00, 
00.20.00 00.00.00'00 00 DATA 00,00,00,00,00,00,00,00, 
00.00 00.00 00 20.00. De' DATA 00,00,00,00,00,00,00,00, 
20 ,00.00.00.00.00.00.00. DATA 00.00.00.00.00,00.00,00, 
00,08,00,00,00,00,00,00, DATA "DO RD OD DELERLOR OR O0, 
0020.00 00 20.00.01 00. DATA 00,00,00,00,00,00,00,00, 
FF'FF/FO.D0.00'00. 38 1B" DATA 00,00,00,00,00,00,00,00, 
3D.15.94.97.C8.CB 4C. 49 DATA 00,00,00,00,00,00,00,00, 
4E.C5.50.4C YFD4 4yg2' DATA 00,00,00,00,00,00,00,00, 
41.07.52.45.C3 42 4C.4F) DATA 00,00,00,00,00,00,00,00, 
43! CB/47 52 .41.50.48.49. DATA 00,00,00,00,00,00,00,00, 
C3/43'4FS0'D3'4D4F'S6 DATA 00,00,00,00,00,00,00,00, 
CS.4F4C.C4 4449 D2.47' DATA 00,00,00,00,00,00,00,00, 
53.41.58.05.47 40. 4F 41. DATA 00,00,00,00,00,00,00,00, 
C4,53,43,52,4F 4C,CC,54. DATA 00,00, 2n,00,00.00,00, 20, 


s®,41,4E,D3,53,50,4C,49, FOR A-2049 TO 10280 STEP 
D4 ,43,4C,45,41,D2,41,50, 8:5-0:C=0: FOR B-O IO 7: 
59,45,4E,C4,54,45,58,D4. GOSUB 60040 
53.49,54,C5,53,50,41.43. S=S+H+L-C:0-5>255:5-255-5 
CS,52,41,53,54,45,D2.4F. AND 255:POKE A+B,H+L:NEXT 
46,C6,49,4E,56 ,45,52.D3. B:GOSUB 80040 

42 ,45.47,.49.CE 43.49.52. FS="PRUEFSUMME OK”: IF 5<> 
43,4C,C5,44.,49,53.CB.41. H+L IHEN FS="CRUS] 
55,54,CF,42,52,55.53,C8, PRUEFSUMMENFEHLER” :F=F+1 
46,49,4C,CC,41,54,AB.4B. GOSUB 60099: NEXT A: PRINT ” 
43,4F,50.D9,42.4F,D7.46. CDOWNI"F"FEHLER”: END 

54 ,45,58,D4.57.49.4E.uy. READ HS:G0SUB 60050: H=L* 
4F,D7,42,49.54,03.53.54. 16: HS=MIDS CHS,2) 
59,4C,C5,49.4E.4B.45.D9. L=ASC CHS+"X”)-4B: IF Le 
S2,4F ‚D4,52.45,53,45.D4- DR L>22 IHEN 60088 
44,45,D6,50,4F .49.4E.54. IF L<10 THEN RETURN 
AB,00,78,88,11,38.3E.83. L=-L-7: IF L>93 THEN RETURN 
3F ‚86,9B,86,E0,83,4D.87. FS="ERUSIEINGABEFEHLER":L= 
08,87 ,AD,8D,E2.,8C.4B.BC. O:F=F+l 
68,8C,2B,91,AC,85,5D,BE. PRINT ”ZEILE” PEEK c64)* 
E4.84,79,8D,C4,83,88.92. 2S6+PEEK C63)F$: RETURN 


Listing 7: Kombinierter Hexdump-Basiclader von HIRES 64 
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Mit einer simplen Sprite-Erweite- 
rung kann man niemand mehr hin- 
ter dem Ofen hervorlocken. Bei 
Sprite-Basic werden aber selbst 
abgebrühte Profis hellhörig: Raffi- 
nierte Befehle lassen Spritebewe- 
gung, Animation, Kollisionsabfra- 
ge und Sounderzeugung gleich- 
zeitig ablaufen — und nebenher 
läuft noch das Hauptprogramm! 
Möglich ist das nur durch den Ein- 
satz von IRQ-Routinen. Dabei han- 
delt es sich um Maschinenpro- 
gramme, die komplexe Aufgaben 
unabhängig vom Basic-Interpreter 
ausführen. Sechzigmal in der Se- 
kunde unterbricht der Prozessor 
seine normale Tätigkeit und küm- 
mert sich um die Tastaturabfrage 
und andere Haushaltstätigkeiten. 
Sprite-Basic hängt sich in diese 
Unterbrechungsroutine ein. So ist 
eine kontinuierliche Steuerung 
von Sprites und Sound gewährlei- 
stet. 


Komplexe 


Bewegungsmuster 


Besondere Leckerbissen sind die 
Befehle TURN und ANIMATE. Sie 
lassen Sprites komplexe Bewe- 
gungsmuster ausführen und erlau- 
ben Trickfilmfiguren mit bis zu 64 
verschiedenen Bewegungssta- 
dien. Actiongeladene Spiele sind 
so im Handumdrehen program- 
miert, 

Hier die Befehlsübersicht: - 

a) Befehle für Sprites und Zeichen- 
satz 

SHOW: schaltet Sprite ein. 
Parameter: 

Spritenummer (1—8) 
Multicolorflag (l=ein, O=aus) 
Priorität (1=Sprite hinter Zeichen, 
0=Sprite vor Zeichen) 

Beispiel: 

SHOW 1,1,0: Sprite ] in Multicolor 
vor Hintergrundzeichen darstel- 
len. 
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mit VIC 


Sprite-Basic bringt 
Leben auf den Bild- 


schirm: Trickfiguren 


| springen von Wand zu 


Wand und schlagen 
Purzelbäume — alles 
interruptgesteuert. 
HIDE: Schaltet Sprite ab. 
Parameter: 
Spritenummer (1—18). \ 
Beispiel: 


HIDE 1: Schaltet Sprite 1 ab. 

SET: Positioniert ein Sprite. 
Parameter: 

Spritenummer (1—18) 
X-Koordinate (0—511]) 
Y-Koordinate (0—255) 

Beispiel: 

SET 1,160,130: Setzt Sprite 1 in die 
Bildschirmmitte. 

BLOCK: Bestimmt den Speicher- 
bereich, aus dem die Spritedaten 
kommen. Parameter: 
Spritenummer (1—8) 
Blocknummer (0—63) 

Beispiel: 

BLOCK 1,10: Sprite 1 bezieht.seine 
Daten aus Block 10. 

COLOR: Legt die Spritefarbe fest. 
Parameter: 

Spritenummer (1-8) 

Farbe (0—15) 

Beispiel: 

COLOR 1,1: Sprite | in weiß. 
MULTI: Bestimmt die Multicolor- 
farben 1 und 2 aller Sprites. 
Parameter: 

Farbel (0—15) 

Farbe2 (0—15) 

Beispiel: 

MULTI 1,2: Multicolor 1=weiß; 
2=10t. 

SIZE: Regelt die Vergrößerung. 
Parameter: 

Spritenummer (1-8) 
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Zeichentrick 


X-Vergrößerung (O=normal, 
l=vergrößert) 

Y-Vergrößerung (O=normal, 
l=vergrößert) 

Beispiel: 


SIZE 1,1,0: Sprite 1 in X-Richtung 
groß, in Y-Richtung normal. 
SPREDIT: Bestimmt den Sprite- 
block, der mit PAT erstellt werden 
soll. Parameter: 

Blocknummer (0-63) 

Beispiel: 

SPREDIT 12: Nachfolgend wird 
Spriteblock 12 erstellt. 

CHREDIT: Bestimmt das Zeichen, 
das mit PAT editiert werden soll. 
Parameter: 
Zeichennummer (0—51]) 

Beispiel: 

CHREDIT 1: Das ’A' wird geän- 
dert. 

CHREDIT 257: Das 'A' des zweiten 
Zeichensatzes wird geändert. 


PAT: Gibt das Muster eines 
Zeichens oder Sprites an. 
Parameter: 


String mit acht Zeichen für CHRE- 
DIT und mit 24 Zeichen bei SPRE- 
DIT. . Dabei bedeutet '.' einen 
nicht gesetzten Punkt; jedes ande- 
re Zeichen wird als gesetzter 
Punkt interpretiert. Beispiel: 
PATE. Krk... 
KkErR,,Ei" 

Für ein Sprite werden 21 PAT-Zei- 
len benötigt, für ein Zeichen nur 
acht. 


Mehrfarbige Sprites 
a a 


MPAT: Definiert mehrfarbige 
Sprites. Parameter: 

String mit zwölf Zeichen Länge. 
Dabei bedeuten: 

. = nicht gesetzter Punkt 

A = Punkt in der Spritefarbe 

B = Punkt in Multicolorfarbe 1 

C = Punkt in Multicolorfarbe 2 
Beispiel: 

MPAT"AAR..BB..CC. ." 

OLD: Ersetzt den selbstdefinier- 
ten Zeichensatz durch den einge- 
bauten. 


COPY: Kopiert einen Spriteblock 
in einen anderen. Parameter: 
Block] (0—63) 

Block2 (0-63) 

Beispiel: 

COPY 13,14 Kopiert Block 13 
nach 14. 

b) Befehle zur Interruptsteuerung 
MOVE: Bewegt ein Sprite über In- 
terrupt. Parameter: 

Spritenummer (1—8) 

Winkel im  Gegenuhrzeigersinn 
zur Horizontalen (0—360) 
Schrittweite (0—127) 
Geschwindigkeit (0—127), wobei 1 
die höchste Geschwindigkeit ist 
Schrittzahl (0—65535), wobei 
0=Nonstopbewegung 

Flag: 0=Basicprogramm läuft wei- 
ter, 1=Basicprogramm wartet, bis 
die Spritebewegung ausgeführt 
wurde. 

Beispiel: 

MOVE 1,90,1,1,10,1: Sprite 1 wird 
senkrecht nach oben mit maxima- 
ler Geschwindigkeit in Einer- 
schritten bewegt. Insgesamt zehn 
Schritte, dann läuft das Basic-Pro- 
gramm weiter, 

MOVE 8,77,4,20,0,0: Sprite 8 be- 
wegt sich fortwährend in einem 
Winkel von 77 Grad mit der Ge- 
schwindigkeit 20. Dabei werden 
immer vier Schritte gemacht. Das 
Basicprogramm läuft ungehindert 
weiter. 

NOMOVE: Stoppt ein Sprite. 
Parameter: 

Spritenummer (1—8) 

Beispiel: 

NOMOVE |: Sprite 1 hält an. 
TURN: weist ein Sprite an, nach ei- 
ner bestimmten Anzahl von Schrit- 
ten seine Bewegungsrichtung zu 
ändern. Damit lassen sich Bewe- 
gungen im Quadrat oder Kreis 
einfach realisieren. Parameter: 
Spritenummer (1—8) 

Winkel (0—360) 

Zahl der Schritte (0—65535) 

Zahl der Wiederholungen (0259), 
wobei 0=Nonstop 

Beispiel: 

TURN 1,90,10,20: Sprite 1 dreht 
nach 10 Schritten um 90 Grad, 
nach weiteren 10 Schritten wie- 
der, insgesamt zwanzigmal. 
NOTURN: Stoppt die Richtungsän- 
derung. Parameter: 
Spritenummer (1—8) 

Beispiel: 


NOTURN |: Sprite 1 bewegt sich 
wieder normal. 

ANIMATE: Ein Sprite verändert 
interruptgesteuert sein Muster. 
Parameter: 

Spritenummer (1—8) 

Erster Block (0-63) 

Anzahl der folgenden Blöcke, die 
das Bewegungsmuster enthalten 
Anzahl der Schritte, nach denen 
eine Blockänderung stattfinden 
soll. 

Beispiel: 

ANIMATE 1,13,3,10: Sprite 1 än- 
dert alle zehn Schritte sein Mu- 
ster. Dabei ist der erste Block 13, 
der letzte 15. 

NOANIMATE: Beendet die Mu- 
steränderung. Parameter: 
Spritenummer (1—8) 

Beispiel: 

NOANIMATE 1: Sprite 1 behält 
das momentane Muster. 

SPCOL: Veranlaßt den Rechner, 
bei einer Sprite-Sprite-Kollision in 
ein Unterprogramm zu springen. 
Parameter: 

Spritenummer (1—8) 


- Zeilennummer (0—63999) 


Beispiel: 

SPCOL 1,1000: Wenn Sprite 1 mit 
einem anderen Sprite kollidiert, 
verzweigt das Programm nach 
Zeile 1000. 

NOSPCOL : Hebt SPCOL auf. 
Parameter: 

Spritenummer (1—8). 

CHCOL: Wie SPCOL, allerdings 
bei einer Sprite-Zeichen-Kollision. 
Parameter wie SPCOL.. 
NOCHCOL: Hebt CHCOL auf. 
Parameter. 

Spritenummer (1—8). 

BACK: Springt aus einer Kolli- 
sionsroutine an die Stelle zurück, 


an der der Aufruf erfolgte; die‘ 


Wirkung ist wie bei GOSUB/RE- 
TURN. 

POP: Löscht die letzte Rück- 
sprungadresse. Danach kann man 
statt mit BACK mit GOTO ins 
Hauptprogramm zurückkehren. 
CLFLAG: Ereignet sich während 
eines Kollisionsunterprogramms 
ein weiterer Zusammenstoß, so 
bleibt der Rechner normalerwei- 
se in dem Unterprogramm, das er 
zuerst angesprungen hat. Ist eine 
weitere  Verschachtelung er- 
wünscht, kann man dies mit 
CLFLAG erreichen. Dieser Befehl 
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sollte dann am Anfang der Kolli- 
sionsunterprogramme stehen. 

c) Soundbefehle:' 

VOL: Regelt die Lautstärke. 


“ Parameter. 


Lautstärke (0—15). 


Beispiel: 


VOL 15: Volle Lautstärke. 
ADSR: Bestimmt die Hüllkurve. 
Parameter: 

Stimme (1—3) 

Anschlag = Attack (0—15) 
Abschwellen=Decay (0—15) 
Halten=Sustain (0—15) 
Ausklingen=Release (0—15) 
Beispiel: 

ADSR 1,1,9,0,0: Stimme 1 klingt 
wie Klavier. 

WAVE: Legt die Wellenform fest. 
Parameter: 

Stimme (1—3) 

Wellenform: 0=Dreieck, 1=Säge- 
zahn, 32=Rechteck, 3=Rauschen 
Beispiel: 

WAVE 1,3: Stimme 1 produziert 
Rauschen. 

PULSE: Bestimmt das Tastverhält- 
nis bei Rechteckschwingung. 
Parameter: 

Stimme (1—3) 

Tastverhältnis (0—65535) 

Beispiel: 

PULSE 2,2000: Stimme 2 hat ein 
Tastverhältnis von 1:2000. 

PLAY: Spielt einen Ton. 
Parameter: 

Stimme (1—3) 

Frequenz in Hertz 

Dauer in Sekunden 

Flag: 0=Basicprogramm läuft wei- 
ter, 1=Basicprogramm wartet, bis 
der Ton gespielt ist. 

Beispiel: 

PLAY 1,400,10,0: Stimme 1 spielt 
10 Sekunden lang den Kammerton 
A, das Basicprogramm läuft dabei 
weiter. 

d) Sonstige Befehle: 

CURSOR: Positioniert den Cursor. 
Parameter: 

Spalte (0—39) 

Zeile (0—24) 

Beispiel: 

CURSOR 20,12: Setzt Cursor i in die 
Bildschirmmitte. 

PLOT: Setzt ein a mit Far- 
be. Parameter: 
Spalte (0—39) 

Zeile (0—24) 
Zeichencode (0—255) 
Farbe (0—15) 
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Beispiel:»> 


PLOT 20,12,1,0: Setzt ein schwar- 
zes A in die Bildschirmmitte. 
NOBREAK: Schaltet die Stop-Ta- 
ste ab. 

RENEW: Holt ein mit NEW oder 
Reset gelöschtes Basicprogramm 
zurück. 

KILL: Schaltet Sprite-Basic ab. 

e) Funktionen; 

SPX (S): Bestimmt die X-Koordina- 
te von Sprite S. i 

Beispiel: 

A=SPX (}). 


SPY(S): Bestimmt die Y-Koordinate: 


von Sprite S. 

Beispiel: 

B=SPY() 

ANG(S): Ergibt den Winkel, in 

dem sich Sprite S bewegt. 

SCOL(S): Liefert ], wenn Sprite S 

mit einem anderen Sprite zusam- 

mengestoßen ist, sonst 0. 

CCOL(S): Liefert 1, wenn Sprite S 

mit einem Hintergrundzeichen 

kollidiert ist, sonst 0. 

CHAR(S,Z2): Bestimmt den Code 

des Zeichens, das sich in Spalte S, 

Zeile Z befindet. 

FIRE(P): Liefert den Zustand des 

Feuerknopfes eines Joysticks in 

Port P. Ist FIRE(P)=1, dann wurde 

der Knopf gedrückt. Ansonsten ist 

FIRE(P)=0. 

JOY(N) Diese Funktion erlaubt 
. eine schnelle Auswertung der Joy- 

stickbewegung. 

N= 1: fragt bei Joystick 2 alle Rich- 

tungen ab. 

N=2: fragt bei Joystick 2 nur 90 

und 270 Grad ab (Vertikalbewe- 

gung). 

N=3: fragt bei Joystick 2 nur 180 

und 360 Grad ab (Horizontalbewe- 

gung). 


N=4: fragt bei Joystick 2 
90,180,270 und 360 Grad ab. 

N=5: fragt bei Joystick 1 alle Rich- 
tungen ab. 

N=6: fragt bei Joystick 1 nur 90 
und 270 Grad ab. 

N=7: fragt bei Joystick I nur 180 
und 360 Grad ab. 

N=8: fragt bei Joystick 1 
90, 180, 270 und 360 Grad ab. 

Bei JOY(l) oder JOY(5) werden 
auch die Winkel zwischen den 


vier Hauptrichtungen ausgege- 
ben. Dabei gilt: 
Joystickbewegung Gradzahl 
Oben 90 

Links 180 

Unten 270 

Rechts 360 

Beispiel: 


PRINT. JOY(2): Druckt einen Win- 
kel von 90 Grad aus, wenn der 
Joystick 2 nach oben gedrückt 
wurde, und einen Winkel von 270 
Grad, wenn eine Bewegung nach 
unten stattfand. Wird der Joystick 
nach rechts oder links oder über- 
haupt nicht bewegt, erscheint der 
Wert. 

Diese auf: den ersten Blick um- 
ständliche Abfrage erleichtert das 
Programmieren der Spritebewe- 
gung mit dem’MOVE-Befehl, da 
die Winkelwerte direkt als Para- 
meter übernommen werden kön- 
nen. 

Speicherbelegung von Sprite-Ba- 
sic: 

$9900—$9CEE: Hauptprogramm 
mit Routinen zur Verwendung der 
neuen Befehle. 

$9D00--$9DF8: Tabelle für Win- 
kelbewegung der Sprites. 


0C,08,C2,07,39E,20,32,39, 
36,32,00,00,00,A2,11,nD, 
08,BD,30,08,F0,03,39,58, 
00,CN,88,10,F4,84,48,20, 
BB,A3,68,AA,10,E9,20,44, 
AB,20,0C,39,4C,74,A4,D8, 
gF,1A,OF,00,00,00,42,08, 
CB,CB,E5,1A,00,00,00,ın, 
OF,8B,E3,BD,39,04,9A,DS, 
gA,0R,3B,44,9B,A2,0B,BD, 
00,99,90,00,03,CA,10,F7, 
20,5C,99,20,57,C5,20,44, 
ES,20,F1,99,R0,00,B3,6n, 
39,20,D2,FF,C8,C0,29,D, 
F5,A9,39,85,34,85,38,#9, 
00,85,33,85,37,49,F®,8D, 
06,D4,80,0D,D4,8D,14,D4, 
AS,10,80,C4,97,8D0,CB,07, 
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$C000-$CBCB: Die neuen Befeh- 
le als Unterprogramme. 
$CE00--$CFE8: Bildschirmspei- 
cher. Es 
$E000-$EFFF: Spritedaten für 
Block 0—63. | 
$F000—$FFFF: Zeichensatz, 
Außerdem: 

50600-—$07FF: Zwischenspeicher 
für verschiedene Zwecke: 

Beim Laden von Diskette schaltet 
Sprite-Basic den Bildschirm ab, 
um bei aktiven Sprites den Prozes- 
sor nicht in Zeitnöte zu bringen. 
Damit ist eine störungsfreie Daten- 
übertragung gewährleistet. 

Listing 2 ist ein komplettes Ac- 
tionspiel. Man beachte, daß die 
Hauptroutine ab Zeile 2210 nur 
sieben Zeilen umfaßt. 

Listing 3 demonstriert die Mög- 
lichkeiten von ANIMATE und 
TURN. 

Das Programm ist ganz in: Maschi- 


-nensprache geschrieben. Es ist 


als kombinierter Hexdump-Basic- 
lader abgedruckt (Listing 1). Wie 
man mit dieser Art von Listing um- 
geht, steht auf Seite 6. Wird das 
Programm als Basiclader einge- 
geben, so muß der Lader vor dem 
Start mit RUN abgespeichert wer- 
den. Nach dem Einpoken der Da- 
ten kann das fertige Maschinen- 
programm mit 

POKE 43, 1:POKE 44, 8 

POKE 45,229:POKE 46, 26 

SAVE "NAME" 8 

auf Diskette abgespeichert wer- 
den. Wird Sprite-Basic als Hex- 
dump eingegeben, so muß der 
Checker benutzt werden. Als Start- 
adresse ist 0801 anzugeben. 
(Andreas Schulte: mr 


80,D2,07,80,04,D4,8D,DB, 
D4,8D,12,D4,60,A9,00,n0, 
00,393,00,06,39,00,07,CB, 
D®,F7,60,93,11,20,20,53, 
590,52,49,54,45,2D,42,41, 
53,49,43,11,290,08,43,89, 
31,39,38,35,20,42,59,290, 
41,2E,53,43,48,55,4C,54, 
45,49,53,53,78,20,53,E4, 
20,15,FD,A9,00,8D0,18,D4, 
80,15,D00,49,03,0D,00,DD, 
8D0,00,DD,A9,14,8D,18,DD2, 
A3,00,80,1A,D0,58,A9,04, 
80,88,02,4C,44,ES,AD,18, 
D8,C9,3F\F®,2A,20,F1,38, 
78,A9,F5,80,14,903,A9,C8, 
80,15,03,A9,01,8D,1A,DD, 
A93,00,80,12,D8,A3,1B,8D, D8 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
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11,D0,58,49,FF,85,0n,n3, 
18,2D,11,D0,8D,11,D8,4C, 
83,R4,A9,FC,2D,00,DD,8D, 
00,DD,A93,3C,8D,18,D0,r3, 
CC,80,88,02,60,A6,7A,rO, 
04,84,0F,BD,08,02,10,07, 
CS,FF,FO,41,E8,D0,F4,CS, 
20,F0,3A,85,08,C3,22,F®, 
59,24,0F,70,30,C3,3F,DO, 
04,49,33,00,28,C3,30,30, 
24,C3,3C,30,20,4C,3E,3A, 
B4,71,R0,00,84,0B,88,86, 
7A,CA,C8,E8,BD,00,02,38, 
F9,39E,AQ,F®,F5,C9,80,D®, 
30,05,0B,R4,71,E8,C8,33, 
FB,01,B9,FB,01,F0,36,38, 
E3,3A,F0,04,C3,49,D0,02, 
85,0F,38,E3,55,D®,3C,85, 
08,BD,00,02,F®,DF,C5,08, 
F0,DB,C8,939,FB,01,E8,D®, 
FO,A6,7A,E6,0B,C8,B9,9D, 
AD,ı0,FA,BS,39E,AB®,D®,B4, 
BD,00,02,10,BE,99,FD,01, 
C6,7B,A9,FF,85,7A,60,84, 
71,n0,00,84,08B,88,86, 7A, 
CA,C8,EB,BD,00,02,38,F9, 
OE,SC,FO,FS,C9,80,D®,08, 
05,0B,18,69,4C,4C,52,9A, 
A6,7A,E6,0B,C8,B9,0D,SC, 
10,FA,B3,0E,3C,D®,DC,r4, 
71,A6,7A,4C,37,9A,10,30, 
C9,FF,FO,2C,24,0F,30,28, 
C9,CC,B0,03,4C,24,47,38, 
E9,CB,AA,84,49,AB,FF,CH, 
F0,08,C8,B39,0E,3C,10,FA, 
30,F5,C8,B9,0E,3C,30,05, 
20,47,AB,D®,FS,4C,EF,AB, 
4C,F3,A6,A5,9D,F®,0D,R2, 
07,R9,00,90,80,06,3D,88, 
06,CA,10,F7,20,73,00,20, 
24,9B,4C,AE,A7,F®,17,E9, 
80,90,14,C9,4C,30,13,E3, 
4C,OA,AB,B9,AD,3B,48,B9, 
AC,3B,48,4C,73,00,60,4C, 
04,AB,4C,F3,A7,A9,00,85, 
20,20,73,00,B0,03,4C,F3, 
BC,C9,F5,90,19,C9,FF,Fo, 
15,38,E9,F5,0A,AA,BD,FE, 
9B,85,55,BD,FF,3B,85,56, 
20,54,00,4C,BD,AD,4C,s2, 
AE,20,39E,AD,20,79,00,C3, 
893,F0,05,n9,A7,20,FF,AE, 
AS,61,D0,08,20,03,A9,DD, 
03,4C,FB,AB,20,79,00,B0, 
03,4C,AQ,AB,4C,24,9B,08, 
A2,07,20,5C,393,49,05,8D, 
28,03,49,CB,8D,29,03,22, 
3C,39,4C,72,AB,6F,3B,35, 
3B,32,39,23,C0,47,C0,67, 
C@,BF,CO,DA,CO,F0,CD,AF, 
C0,10,C1,55,C1,4D,C1,47, 
C1,9A,C1,8C,C1,19,C3,60, 
C3,39,C1,7E,C1,71,C3,B9, 
C3,C7,C3,FA,C3,5E,C4,F4, 
C4,FA,C4,19,C5,FF,BF,S6, 
C5,8B,C5,A8,C5,C1,C5,C8, 
CS,CF,C5,D6,C5,E8,C5,65, 
C6,94,C6,2C,C7,4F,C7,BC, 
£7,3D,C7,C8,C7,D6,C7,38, 
C8,52,C8,566,C8,7A,C8,48, 
C6,52,55,CE,4B,49,4C,CC, 
53,48,4F,D7,48,49,44,C5, 
53,45,04,53,49,5A,C5,43, 
4F,4C,4F,D2,42,4C,4F,43, 
CB,4D,55,4C,54,C9,53,50, 


43,4F,CC,43,48,43,4F,CC, 
42,41,43,CB,43,4C,46,4C, 
41,C7,4D,4F,56,C5,4E,4F, 
4D,4F,56,C5,54,55,52,CE, 
4E,4F,54,55,52,CE,4E,4F, 
53,50,43,4F,CC,4E,4F,43, 
48,43,4F,CC,41,4E,49,4D, 
41,54,C5,4E,4F,41,4E,49, 
4D,41,54,C5,53,50,52,45, 
44,49,D4,50,41,D4,4D,50, 
41,D4,4E,4F,42,52,45,41, 
CB,43,55,52,53,4F,D2,43, 
48,52,45,44,49,D4,43,4F, 
50,09,4F,4C,C4,50,4F,D®, 
50,4C,4F,D4,42,4F,52,44, 
45,D2,50,41,50,45,D2,49, 
4E,CB,56,4F,CC,41,44,53, 
D2,57,41,56,C5,50,4C,41, 
D9,50,55,4C,53,C5,52,45, 
4E,45,07,53,50,D9,53,50, 
D8,41,4E,C7,4A,4F,D9,46, 
49,52,C5,53,43,4F,CC,43, 
43,4F,CC,43,48,41,D2,00, 
49,49,49,49,49,49,49,49, 
49,49,49,49,49,49,49,49, 
49,7D,7D,70,7D,7D,7D,7C, 
7C,7C,7B,7B,7B,7A,7A,79, 
79,78,78,77,76,75,75,74, 
73,72,71,70,6F,6E,6D,6C, 
6B,6R,69,68,66,65,64,63, 
61,60,5E,5D,5B,5N,58,57, 
55,54,52,50,4F,4D,4B,49, 
48,46,44,42,40,3F,3D,38B, 
39,37,35,33,31,2F,2D,2B, 
29,27,25,22,20,1E,1C,1a, 
18,16,14,11,0F,0D,08,09, 
07,04,02,00,FE,FC,F9,F7, 
FS,F3,F1,EF,EC,EA,EB,E6, 
E4,E2,E0,DE,DB,D9,D7,D5S, 
03,D1,CF,CD,CB,C3,C7,C5, 
C3,C2,C0,BE,BC,Bn,B8,B7, 
BS,B3,B1,B@,AE,AC,AB,Ag, 
AB,AB,AS,A3,A2,AQ,SF,SD, 
SC,9B,3A,98,97,96,95,94, 
93,92,91,390,8F,8E,8D,8C, 
8B,8B,8N,89,88,88,87,87, 
85,86,85,85,85,84,84,B4, 
83,83,83,83,83,83,83,83, 
83,83,83,84,84,84,85,85, 
85,86,86,87,87,88,88,89, 
8R,8B8,8B,8C,8D,8E,8F,390, 
31,32,93,94,95,36,97,98, 
SA,3B,3C,3D,9F,A®,n2,R3, 
AS,AG,AB,AS,AB,AC,AE,BO, 
B1,B3,B5,B7,B8,BA,BC,BE, 
C0,C1,C3,C5,C7,C9,CB,CD, 
CF,D1,D3,D5,D7,D9,DB,DE, 
EQ,E2,E4,E6,EB,EA,EC,EF, 
F1,F3,F5,F7,F8,FC,FE,0®, 
02,04,07,09,0B,0D,0F,11, 
14,16,18,1A,1C,1E,20,22, 
25,27,29,2B,2D,eF,31,33, 
35,37,39,3B,3D,3E,40,4e, 
44,46,48,49,4B,4D,4F,59, 
52,54,55,57,58,54,5B,5D, 
SE,60,61,63,64,65,66,68, 
63,6A,6B,56C,6D,6E,6F,7®, 
71,72,73,74,75,75,76,77, 
78,78,79,73,7A,7A,7B,7B, 
7B,7C,7C,7C,7D,7D,7D,7D, 
7D,7D,00,00,00,00,00,00, 
00,00,FE,FC,F3,F7,FS,F3, 
F1,EF,EC,EA,EB,E6,E4,Eoe, 
EQ,DE,DB,D3,D7,D5,D3,D1, 
CF,CD,CB,C9,C7,C5,C3,Co, 
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CO,BE,BC,BA,BB,B7,BS,B3, 
B1,B®,AE,AC,AB,AS,AB,AB, 
AS,A3,R2,n0,9F,3D,39C,SB, 
93A,98,37,36,95,94,33,32, 
931,30,8F,8E,8D,8C,8B,8B, 
BR,89,88,88,87,87,86,86, 
85,85,85,84,84,84,83,83, 
83,83,83,83,83,83,83,83, 
83,84,84,84,85,85,85,86, 
86,87,87,88,88,83,8n,88B, 
8B,8C,BD,8E,8F,30,31,32, 
93,94,95,96,97,38,3A,3B, 
9C,30,3F,Ad,A2,A3,A5,AGB, 
AB,A9,AB,AC,AE,BO,B1,B3, 
B5S,B7,58,BA,BC,BE,C9,C1, 
C3,C5,C7,C9,CB,CD,CF,D1, 
D3,0D5,D7,09,DB,DE,E®,E2, 
E4,E6,E8,EA,EC,EF,F1,F3, 
FS,F7,F9,FC,FE,00,02,04, 
07,09,08,0D,0F,11,14,16, 
18,1A,1C,1E,20,22,25,27, 
29,2B,2D,2F,31,33,35,37, 
39,38,3D,3E,40,42,44,46, 
48,49,4B,4D,4F,50,52,54, 
55,57,58,5R,5B,5D,5E,60, 
61,63,64,65,66,68,69,6n, 
6B,5C,60,6E,6F,70,71,7e, 
73,74,75,75,76,77,78,78, 
79,79,7A,74,7B,7B,7B,7C, 
7C,7C,7D,7D,7D,7D,7D,7D, 
7D,7D,7D,7D,7D,7C,7C,7C, 
7B,7B,7B,7A,7A,79,79,78, 
78,77,76,75,75,74,73,78, 
71,70,6F,6E,6D,6C,6B,6R, 
69,68,66,65,64,63,61,60, 
SE,5D,5B,5A,58,57,55,54, 
52,50,4F,4D,4B,49,48,46, 
44,42,40,3F,3D,3B,39,37, 
35,33,31,2F,2D,2B,29,27, 
25,22,20,1E,1C,1A,18,16, 
14,11,0F,0D,0B,09,07,04, 
02,20,0A,C3,20,FD,AE,AS, 
FB,85,FD,AS,FC,85,FE,20, 
DA,C3,A®,3F,78,C6,01,C6, 
01,B1,FD,31,FB,88,10,F3, 
E6,01,E6,01,60,20,E6,CH, 
BD,F5,CA,00,15,D00,8D,15, 
DO,AD,1C,D9,20,AB,CB,8D, 
1C,D®,AD,1B,09,20,AB,CB, 
8D,1B,D9,20,70,CB,D®,DD, 
60,20,E6,CA,BD,FD,Ca,2D, 
15,D0,80,15,D®,AE,FF,07, 
A93,00,30,F0,06,390,80,07, 
3D,B8,07,20,70,CB,D®,E1,: 
60,20,E6,CA,8R,0A,8D,81, 
CO,AA,E8,8E,7C,C0,20,FD, 
AE,20,EB,B7,8E,01,D0,#S, 
14,80,00,D0,A6,15,E0,02, 
90,03,4C,48,B2,CA,30,0F, 
AE,FF,87,BD,FS,CA,0D,1®, 
D20,80,10,D00,4C,AA,CO,RE, 
FF,07,BD,FD,CA,2D,10,D0, 
8D,10,D0,20,70,CB,D®,B3, 
60,20,3E,B7,8E,25,D0,20, 
FD,AE,20,3E,B7,8E,26,D0, 
60,20,E5,CA,AD,1D,D2,2®, 
AB,CB,8D,1D,D®,AD,17,D®, 
22,AB,CB,80,17,09,20,70, 
CB,D0,E6,60,20,E6,CA,20, 
FD,AE,20,3E,B7,8A,AE,FF, 
07,30,27,D0,20,70,CB,D®, 
EB,60,29,E6,Cn,20,FD,RE, 
29,3E,B7,E0,40,30,03,4C, 
48,B2,84,18,69,80,AE,FF, 
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07,9D,F8,CF,28,72,CB,D®, 
E1,60,29,E6,CA,20,FD,AE, 
20,8A,AD,20,F7,B7,AE,FF, 
07,A5,14,3D,99,06,#5,15, 
SD,AQ,06,A9,01,9D,80,06, 
A9,00,80,FD,07,20,70,CB, 
D0,08,60,20,E6,CA,A9,00, 
$9D,80,06,20,70,CB,D2,F3, 
60,19,00,8D,FD,07,60,#A9, 
02,80,FD,07,4C,D4,A8, 00, 
E6,CA,20,FD,AE,20,8n,RD, 
20,F7,B7,AE,FF,07,n5,14, 
9D,38,06,45,15,9D,R8,06, 
A9,01,390,88,06,49,00,8D, 
FD,07,20,70,CB,D@,D8,60, 
20,E6,CA,A9,20,9D,88,06, 
20,70,CB,D0,F3,60,20,E6, 
CA,A9,00,30,F0,06,20,70, 
CB,D®,F3,69,20,E6,Cn,20, 
39,C2,20,FD,AE,20,9E,B7, 
8A,10,03,4C,48,B2,AE,FF, 
07,9D,48,07,78,A5,14,9D, 
EO,06,80,F8,07,45,15,5D, 
E8, 06, 8D,F7,07,20,79,C2, 
58,20, FD,AE,20,9E,B7,BR, 
AE,FF,07,390,D0,26,3D,D8, 
06,A9,00,90,40,07,20,FD, 
AE,20,8A,AD,20,F7,B7,AE, 
FF,87,A5,14,9D,30,07,#5, 
15,9D0,38,07,45,14,D0,09, 
AS,15,D0,05,49,01,30,40, 
07,BD,30,07,08,03,DE,38, 
07,DE,30,07,R9,01,9D,F®, 
06,20,FD,AE,20,9E,B7,E®, 
00,F0,0D,AE,FF,07,BD,4D, 
07,F®,05,BD,F@,06,D0,FB, 
20,790,CB,F0,03,4C,9B,C1, 
60,20, FD,AE,20,8A,AD,AS, 
66,48,19,00,85,66,20,F7, 
B7,A5,15,F0,1F,C9,01,D0, 
06,A5,14,C9,68,90,15,n5, 
14,38, E9,68,B0,02,C6,15, 
85,14,A5,15,38,E9,01,85, 
15,4C,49,C2,68,10,12,A9, 
68,38,E5,14,85,14,B0,02, 
E6,15,A9,01,38,E5,15,85, 
15,60,A9,90,80,33,C2,A9, 
SE,80,97,C2,AD,F7,07,F®, 
06,EE,33,C2,EE,37,C2,RE, 
F8,07,BD,80,9D,48,BD,7®, 
SE,AE,FF,907,9D0,20,07,68, 
90,18,07,BD,48,07,3D,F8, 
06,30,00,07,R9,00,3D,08, 
07,30,10,07,BD,18,07,10, 
09,A9,00,38,FD,48,07,3D, 
F8,06,BD,20,07,10,09,r9, 
00,38, FD,48,07,3D,00,07, 
BD,18,07,10,03,R9,00,38, 
FD,18,07,30,18,07,BD,20, 
07,10,09,A9,20,38,FD,20, 
07,30,20,07,0D,18,07,30, 
22,BD,18,07,98,BD,20,07, 
SD,18,07,38,30,20,07,BD, 
F8,06,\90,10,07,BD,00,07, 
3D,08,07,R9,20,3D,F8,06, 
SD,00,07,BD,18,07,4A,9D, 
28,07,60,20,E6,CA,20,30, 
C2,AE,FF,07,45,14,3D,7®, 
07,45,15,39D,78,87,20,FD, 
AE,20,8A,AD,20,F7,B7,RE, 
FF,07,45,14,9D,50,07,9D;, 
58,07,45,15,9D,60,97,3D, 
68,07,20,FD,AE,22,3E,B7, 
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DATA 01,90,80,07,20,70,CB,D, 
DATA BA,60,20,E6,CA,AE,FF,97, 
DATA A9,00,30,80,07,20,70,CB, 
DATA DO,F®,60,28,E6,CA,20,FD, 
DATA AE,20,3E,87,E0,40,30,03, 
DATA 4C,48,B2,84,18,69,80,AE, 
DATA FF,07,9D,30,07,3D,F8,CF, 
DATA 20,FD,AE,20,3E,B7,8A,AE, 
DATA FF,07,30,38,07,3D0,A0,07, 
DATA 20,FD,AE,20,3E,B7,8A,AE, 
DATA FF,07,3D,A8,07,3D,B0,07, 
DATA A9,01,30,B8,07,20,70,CB, 
DATA D0,B9,60,20,E6,CA,A9,00, 
DATA 3D,B8,07,20,70,CB,DO,F3, 
DATA 60,20,0A,C3,A9,00,A0,3F, 
DATA 91,FB,88,10,FB,A3,03,8D, 
DATA F3,07,60,20,3E,B7,E0,4D0, 
DATA 99,03,4C,4B,B2,8A,4n,4n, 
DATA 18,69, E0,85,FC,BA,0OA,on, 
DATA OA,OA,0n,0R,85,FB,A9,15S, 
DATA 80,F5,07,60,AD,F3,07,8D, 
DATA F6,07,20,3E,AD,20,43,B6, 
DATA 80,FC,07,AD,F6,07,0n,0n, 
DATA @A,CD,FC,07,F0,03,4C,08, 
DATA AF,CE,F5,07,10,03,4C,08, 
DATA AF,AD,00,8C,FA,07,R2,07, 
DATA 78,C6,01,C6,01,AC,FA,07, 
DATA B1,22,R0,00,C9,2E,F®,0n, 
DATA BD,FS,CA,11,FB,91,FB,4C, 
DATA 48,C4,BD,FD,CA,31,FB,91, 
DATA FB,E6,01,E6,01,EE,FA,07, 
DATA 58,CA,10,D4,E6,FB,D9,02, 
DATA E6,FC,CE,F6,07,D0,C7,60, 
DATA AD,F3,07,80,F6,07,20,8E, 
DATA AD,20,R3,B6,80,FC,07,AD, 
DATA F6,07,0A,0n,CD,FC,07,Fo, 
DATA 03,4C,08,AF,CE,FS,07,10, 
DATA 03,4C,08,AF,AD,00,8C,Fn, 
DATA 87,R2,07,78,C6,01,C6,01, 
DATA AC,FA,07,81,22,A0,00,C9, 
DATA 2E,F0,39,C9,41,F®,19,C9, 
DATA 42,F0,07,C9,43,F@,1F,4C, 
DATA 08,AF,BD,FD,CA,31,FB,Ca, 
DATA 1D,FS,CA,91,FB,4C,DE,C4, 
DATA BD,FS,CA,11,FB,CA,3D,FD, 
DATA CA,31,FB,4C,DE,C4,BD,FS, 
DATA CA,11,FB,CA,1D,F5,CA,31, 
DATA FB,4C,DE,C4,BD,FD,CA,31, 
DATA FB,CA,3D,FD,CA,31,FB,E6, 
DATA 01,E6,01,EE,FA,07,58,Ca, 
DATA 10,A1,E6,FB,D®,02,E6,FC, 
DATA CE,F6,07,D0,34,60,#9,01, 
DATA 80,F4,07,60,20,39E,B7,EB, 
DATA 28,90,03,4C,48,B2,8n,48, 
DATA 20,FD,AE,28,3E,B7,E9,19, 
DATA 98,03,4C,48,B2,68,AB,18, 
DATA 4C,F@,FF,20,8A,AD,20,F7, 
DATA B7,A5,15,C9,02,30,03,4C, 
DATA 48,B2,AR5,14,0n,0n,0n,8S, 
DATA FB,AS,14,4A,4A,4n,4n,4n, 
DATA A4,15,F0,03,18,69,08,18, 
DATA 63,F0,85,FC,A9,08,80,F5, 
DATA 07,R9,00,A0,07,391,FB,88, 
DATA 10,FB,A9,01,8D,F3,927,60, 
DATA 78,49,00,80,0E,DC,#3,33, 
DATA 85,01,R2,10,A0,00,n9,D0, 
DATA 80,71,C5,A9,F0,8D,74,C5, 
DATA B9,00,00,39,00,F®,C8,D®, 
DATA F7,EE,71,C5,EE,74,C5,Ca, 
DATA DD®,EE,A9,37,85,01,#9,01, 
DATA 8D,2E,DC,58,60,A9,FF,85, 
DATA 4n,20,BA,A3,3A,C9,80,F®, 
DATA 03,4C,E0,A8,68,68,68,68, 
DATA 68,60,?0,52,C8,20,FD,#RE, 
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20,9E,B7,8A,40,00,31,FB, 
AS,0C,18,65,FC,85,FC,20, 
FD,AE,20,39E,B7,8A,A0,00, 
91,FB,60,20,39E,B7,8E,20, 
D0,50,20,3E,B7,8E,21,D®, 
60,20,93E,B7,8E,86,02,60, 
20,3E,B7,E0,10,90,03,4C, 
48,B2,84,00,18,D4,8D,18, 
D4,60,20,85,CB,20,FD,RE, 
20,9E,B7,E0,10,30,03,4C, 
48,B2,AD,FA,07,18,69,05, 
AB,BA,OA,OA,0A,0n,99,C0, 
07,20,FD,AE,20,9E,B7,ED®, 
10,90,03,4C,48,B2,AD,FA, 
07,18,69,05,A8,84,19,CD0, 
07,99,C0,07,99,00,D4,20, 
FD,AE,20,9E,B7,E0,10,30, 
03,4C,48,B2,AD,Fn,07,18, 
69,06,AB,8A,On,On,on,on, 
99,C0,07,20,FD,AE,20,9E, 
B7,E0,10,30.03.4C.48,B?, 
AD,FA,07,18,69,06,A8,8n, 
19,C0,07,99,C0,07,99,00, 
D4,20,70,CB,D0,84,60,20, 
85,CB,20,FD,AE,20,3E,B7, 
E0,04,90,03,4C,48,B2,AC, 
FA,07,C8,C8,C8,C8,A9,®F, 
39,C0,07,10,91,C6,39,C0, 
07,39,00,04,20,70,CB,D®, 
D6,60,10,20,40,80,20,65, 
CB,AD,FA,07,18,69,04,R8, 
AS,FE,39,C0,07,99,00,D4, 
03,01,99,C0,07,99,00,D4, 
20,FD,AE,20,8A,AD,A0,0S, 
B9,27,07,99,69,00,88,10, 
F7,20,2B,BA,20,F7,B7,AC, 
FA,07,A5,14,99,C0,07,99, 
00,04,A5,15,99,C1,07,99, 
01,04,20,FD,AE,20,8n,AD, 
20,0F,BC,A®,00,84,62,n9, 
3C,85,63,R2,90,38,20,49, 
BC,20,2B,BA,20,F7,B7,AD, 
FB,07,0A,AA,AS,14,90,D9, 
07,45,15,90,DA,07,20,FD, 
AE,20,9E,87,E0,00,F®,OrF, 
AD,FB,07,0A,AA,BD,D9,07, 
DO,FB,BD,DA,07,00,F6,20, 
70,CB,F0,03,4C,95,C6,60, 
85,88,3B,64,5h,00,20,85, 
CB,20,FD,AE,20,BA,AD,e®, 
F7,B7,AD,FA,87,18,69,02, 
AB,AS,14,99,00,D4,R5,15, 
939,01,D4,20,70,CB,D®,DE, 
60,AS,2B,85,FB,A5,2C,85, 
FC,AO,03,C8,B1,FB,DO,FB, 
C8,38,R0,00,18,71,FB,65, 
2B,91,FB,R9,00,C8,71,FB, 
65,2C,91,FB,85,FE,88,B1, 
FB,85,FD,AS,FD,85,FB,#S, 
FE,85,FC,C8,B1,FB,D®,EC, 
AS,FB,18,69,02,85,2D0,65, 
2F,85,31,49,00,65,FC,85, 
PE,85,30,85,32,60,20,56, 
C8,AB,0OR,AA,BD,00,00,85, 
63,49,00,85,62,AD,1®,DD, 
39,F5,CA,F0,02,E6,62,Re, 
90,38,4C,49,BC,20,96,C8, 
OA,AAR,BD,01,D0,AB,4C,R2, 
B3,20,396,C8,AA,BD,E®,06, 
A8,BD,E8,06,4C,95,B3,29, 
36,C8,48,R2,01,29,04,D0, 
02,R2,00,68,23,03,R8,C9, 
03,D0,0B,49,03,3D,00,DC, 
03,2C,C9,8F,D0,03,B9,0F, 26 
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1713 
1721 
1729 
1731 
1739 
1741 
1749 
1751 
1759 
1761 
1769 
1771 
1779 
1781 
1789 
1731 
1799 
17A1 
179 
17B1 
17B9 
17C1 
17C9 
17D1 
17D9 
17E1 
17E9 
17F1 
17F9 
1801 
1809 
1811 
1819 
1821 
1829 
1831 
1833 
1841 
1849 
1851 
1859 
1861 


1871 
1879 
1881 
1888 
18931 
1839 
18A1 
1843 
18B1 
18B3 
18C1 
18C83 
18D1 
18083 
18E1 
18E3 
18F1 
18F3 
13901 
13903 
13911 
1913 
13921 
13923 
1931 
1939 
1341 
1949 
1351 


Listing 1: Kombinierter Hexdump-Basiclader von Sprite-Basic 
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ua 


1869 ı 


1711 ‘4838 


4840 
4852 
4860 
4879 
4B88 
4898 
4390 
4918 
4920 
4938 
49340 
4950 
4968 
4970 
4380 
4330 
5920 
Solo 
5920 
5039 
5249 
50508 
So68 
5070 
=] 21) 
5239 
5108 
511® 
5128 
5130 
5149 
5158 
5168 
5170 
5180 
5190 
5208 
s21® 
52228 
5230 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


C8,30,00,DC,19,13,C8,AB, 
B9,17,C8,85,63,B3,28,C8, 
85,62,R2,90,38,4C,49,BC, 
OF,0C,03,0C,00,03,0C,03, 
201,00,00,00,00,3B,2D,68, 
02,E1,87,B4,00,80E,5n,00, 
00,00,00,00,008,00,01,00, 
01,00,00,00,00,00,01,00, 
20,20,96,C8,C9,02,90,03, 
4C,45,B2,49,01,AA,BD,00, 
DC,29,10,R8,B3,17,C8,AB, 
4C,A2,B3,20,396,C8,AA,BD, 
FS,CA,2D,F2,07,F0,02,#9, 
01,AB,A9,00,4C,95,B3,20, 
96,CB,AA,BD,FS,CA,2D,Fl, 
07,F0,02,R9,01,A8,A3,00, 
4C,95,B3,20,73,00,20,FA, 
AE,20,B2,C8,20,F7,AE,#A3, 
00,85,62,40,00,B1,FB,85, 
63,A2,30,38,4C,49,BC,2®, 
73,00,20,F1,AE,20,F7,B7, 
AS,15,F0,03,4C,45,B2,C6, 
14,45,14,C9,28,30,03,4C, 
45,B2,60,20,3E,B7,BE,FB, 
07,E0,28,90,03,4C,48,B2, 
20,FD,AE,20,9E,B7,8E,FR, 
07,E0,19,90,03,4C,48,B2, 
A9,D8,85,FB,A9,CB,85,FC, 
AE,FA,07,19,28,18,65,FB, 
85,FB,90,02,E6,FC,CA,10, 
F2,AD,FB,07,18,65,FB,85, 
FB,30,02,E6,FC,60,AD,19, 
D0,29,01,F0,15,AD,1E,D®, 
8D,F2,07,AD,ı1F,D0,80,F1, 
07,AD,19,D9,8D0,19,D0,.C, 
81,EA,AS,0R,30,0B,A9,EF, 
2D,11,00,80,11,D8,4C,31, 
EA,A2,04,BD,D9,07,00,27, 
BD,DA,07,D0,1F,E0,00,D0, 
05,AD,04,4C,40,C93,E0,02, 
D0,05,Rd,0B,4C,40,C9,Rd, 
12,A9,FE,39,C0,07,39,C0, 
07,39,00,D4,DE,DA,07,DE, 
D9,07,CA,CA,10,CD,A2,07, 
8E,FE,07,AE,FE,07,BD,F®, 
06,F0,03,20,A9,C9,AD,FD, 
07,D00,1D,AE,FE,07,BD,80, 
06,F®,08,AD,F2,07,3D,F5S, 
CA,D®,ıF,BD,88,06,F0,08, 
AD,F1,07,30,F5,CA,DaO,ın, 
CE,FE,87,10,CE,CE,F9,07, 
10,C4,A9,03,8D,F3,97,4C, 
31,EA,A9,01,9D,B9,06,4C, 
87,C9,R9,01,3D,B8,06,4C, 
87,C9,AE,FE,07,BD,D®,®6, 
FO,6B,DE,D8,26,D0,66,BD, 
D0,06,30,08,06,BD,80,07, 
F0,03,20,1D,CA,BD,BB,07, 
FO,03,20,9A,CA,AC,FE,07, 
B9,F8,06,An,B9,08,07,20, 
BA,CA,AE,FE,07,BD,28,07, 
18,7D,20,07,3D,28,07,DD, 
18,07,930,14,38,FD,18,07, 
50,28,07,AC,FE,07,B9,10, 
07,AA,B9,00,07,20,BA,Ca, 
AE,FE,07,BD,40,07,D0,15, 
BD,30,07,00,0D,BD, 38,07, 
D0,05,R9,00,3D,F®,06,DE, 
38,07,DE,30,07,60,BD,S8, 
07,F0,03,4C,356,CA,BD,68, 
07,00,69,BD,50,07,30D,58, 
07,5BD,50,07,30,68,07,18, 
BD,70,07,7D,E®,06,3D,E®, 


1961 
1963 
1971 
1973 
1981 
1983 
1931 
1939 
ı9Al 
19A3 
19B1 
19B93 
1S9C1 
19C9 
19D1 
19D3 
19E1 
19E3 
ı9F1 
19F3 
1AB1 
1ABS 
ırll 
1A193 
ır21 
ırn23 
ı1A3l 
1A33 
ı1A41 
1A49 
ıAS1 
1AS53 
ıA61 
1A63 
ıA?71 
1A73 
ır81 
1A83 
ı1AS1 
1A93 
1ArAl 
1AA3 
1ABl 
1ABS 
1Acı 
1AC9 
1AD1 
ı1AD3 
1AE1 


5578 
5589 
55939 
5600 
S618 
5620 
5639 
5640 
Ss650 
S668 
5670 
5688 
5630 
5720 
5718 
57208 
5738 
5740 
5758 
5768 
5770 
5788 
5738 
5820 
5818 
58208 
5839 
5840 
5850 
5860 
5870 
5880 
5838 
590908 
5910 
5920 
5939 
5348 
5350 
5360 
5370 
5982 
5332 
6900 
6012 
6928 
6038 
6040 
6058 


69022808 


60018 


69028 


68038 
69240 


69058 


69868 


60972 
60088 


60939 


06,BD,78,87,7D,E8,06, 
DATA EB,06,BD,E8,06,F2,1C, 
DATA 01,09,07,BD,E®,96,C9, 
DATA 39,11,38,BD,E®,06,ES, 
DATA SD,EO,06,BD,E8,06,ES, 
DATA SD,E8,06,BD,E®,06,8D, 
DATA 07,BD,E8,06,80,F7,07, 
DATA FF,07,48,8E,FF,97,00, 
DATA C2,68,80,FF,07,BD,88, 
DATA F0,0D0,DE,88,27,D0,08, 
DATA 09,30,80,07,DE,68,07, 
DATA 58,07,60,DE,B®,07,D0, 
DATA BD,A8,07,30,B0,07,FE, 
DATA CF,DE,A8,07,00,0C,BD, 
DATA 07,3D,F8,CF,BD,98,07, 
DATA A®,07,690,48,398,0A,AB, 
DATA 18,79,01,00,99,01,D0, 
DATA 18,79,00,00,99,00,D0, 
DATA 12,8A,39,12,98,4A, AA, 
DATA FS,CA,4D,10,D98,8D,10, 
DATA 4C,ES,CA,BA,30,EE,60, 
DATA SE,B7,CA,8E,FF,07,E0, 
DATA 39,03,4C,48,B2,60,01, 
DATA 04,08,10,20,40,80,FE, 
DATA FB,F7,EF,DF,BF,7F,AS, 
DATA D®,SE,AD,FD,027,D0,59, 
DATA 00,BD,B®,06,D09,1C,BD, 
DATA 06, F0,48,A9,01,8D,FD, 
DATA A9,00,3D,B8,06,BD,S8, 
DATA 85,14,BD,A8,06,85,15, 
DATA 45,CB,A9,01,8D0,FD,07, 
DATA 00,90,B9,06,BD,30,06, 
DATA 14,BD,A0,06,85,15,49, 
DATA 20,FB,A3,A5,7B,48,#A5, 
DATA 48,A5,3A,48,A5,39,48, 
DATA 8D,48,20,79,00,20,43, 
DATA 4C,AE,A7,E8,E0,08,00, 
DATA AD,F4,07,F0,01,60,4C, 
DATA F6,A9,2C,A0,00,D1,7A, 
DATA 0A,20,73,00,D0,07,68, 
DATA 4C,08,AF,A9,00,60,20, 
DATA B7,CA,E®,23,390,03,4C, 
DATA B2,BE,FB,07,E0,80,D®, 
DATA A9,00,4C,A7,CB,E®,01, 
DATA 05,A0,07,4C,A7,CB,AB, 
DATA 8C,FA,07,60,48,20,FD, 
DATA 20,9E,B7,AC,FF,07,E®, 
DATA 39,03,4C,48,B2,CA,D®, 
DATA 68,19, F5,CA,4C,CA,CB, 
DATA 39,FD,CA,60,00,00,00, 


FOR A=2049 TO 6888 STEP 8: 
S=-2:C=8:FOR B=®0 TO 7:60SUB 
60048 
5=5+H+L-C:C0=5> 255: S=-255-S 
AND 255:POKE A+B,H+L:NEXT 
B:60SUB 69940 
FS="PRUEFSUMME OK”: IF S<> 
H+L THEN FS="CERUS] 
PRUEFSUMMENFEHLER”:F=F+1 
GOSUB 68899: NEXT A:PRINT " 
EDOWNI”F"FEHLER”: END 

READ H$:G0SUB 62050: H=L* 
16:H$=MIDS$ CH$,2) 

L=-ASC CHS+"X”)-4B: IF L<® 
DR L>22 THEN 69082 

IF L<18 THEN RETURN 
L=L-7:IF L>9 THEN RETURN 
FS="ERUSJEINGABEFEHLER”:L= 
O:F=-F+1 

PRINT ”ZEILE” PEEK (64)* 
ES6+PEEK (63)9F$: RETURN 


SD, 
cs, 21 
68, B6 
68, 54 
o1, D® 
F8, 6D 
AD, ıD 
79, 58 
07, B4 
A9, CF 
DE, 7B 
1A, 31 
FB, 2D 
30, 79 
SD, 
68, 7E 
BA, AE 
90, AB 
BD, Ei 
Do, EB 
20, 2A 
08, F2 
e2, Ee 
FD, AD 
90, SC 
a2, ıl 
BB, AS 
07, 20 
06, 59 
4Cc, D® 
a9, 11 
85, BB 
03,' 06 
7A, B2 
Ag, AO 
AB, C7 
Ag, 5B 
ED, D2 
Do, B3 
68, 25 
gE, 6C 
48, 5A 
05, cı 
Do, 51 
DE, BF 
AE, B® 
22, 62 
97, 41 
68, 5F 
20, A7 


nu 
w 


3938 


5034 


569393 


2267 
2715 
3198 
1944 
1334 
2469 


2726 


g30 DIM Asc21) = NEXT T 2002 MOVE 3,-30,2,FNAC7),0,0 
10080 HIS="00:00:90”« : 201® MOVE 4,-90,2,FNAC9),0,0 
1018 DEF FNACXI=INTERNDCII=X)+2 SPREDIT 1 2020 - 

1028 HIDE 1,2,3,4 FOR T=19 TO 1 STEP -ı 2030 REM SOUND INITIALISIEREN 
1838 PAPER11:BORDER® :MPAT ASC(CT) 2040 : 

1842 VOLO NEXT T 2050 WAUE1,0:ADSR 1,0,8,15,9 
1058 CARS=3 SPREDIT 2 2062 VOL1S:PLAY1,100,1000,0 
LOBDNE Re Der  PIEEBENPATIB TE eate 2070 : 

1065 INK 15 2080 REM SPIELBEGINN 

1070 PRINT? 20... | 1668 MPAT”.B..... SL ra 

1080 PRINT TABC10)” Be Her 2188 INK 2:CURSOR 33,2: PRINT”’CpeR»B”: 
1098 PRINT TABC190)” INK 1 


aa Ber rer : 2110 CURSOR 33,8: PRINT"TINE” 
R 2120 CURSOR 32,12: PRINT"CARS” 
1120 PRINT TABC10)”M 
1130 PRINT TABC1O)”M MPAT”. „BACCCAA.B. 2130 CURSOR 36,12: PRINTCARS 
114® PRINT TABC10)” MPAT”. .BAACAA...B 214® CURSOR 33,15: PRINT"KIGK” 
1150 PRINT TABCIO)” um MPAT” .B.ARARAAA.B 215® CURSOR 31,16: PRINTHIS 
1160 PRINT TABCB)"sEWRITTEN MPAT"B. „AACCAR,... 2160 SPCOL 1,2310 
» MPAT”. . „AACCA.... 
BY A.SCHULTEISS 3 F 2178 CHCOL 1,2310 


1170 PRINT TABC14)"SEIHIT ANY KEY” en: 2180 . 
1180 GETA$: IFAS=""THEN1180 EEE, 219@ REM HAUPTPROGRAMM Cı9 

1198 PRINT” AH AR mr sich 2200 : 

1200 : HPATT. s.+B.. B21® AS-LEFTSCTIS,2)+”:"+MIDSCTIS,3,2)+”: 
1210 REM SPRITES-DEFINIEREN MPAT"..B... . "+RIGHTSCTIS, 2) 

ee En a 2220 CURSOR 31,9: PRINTAS 

er ee ee Beh. 2238 IF AS>HIS THEN HIS=AS 

IESOHASCH IF ISCECLE ei | ABSBENPAT 2240 CURSOR 31,16: PRINTHIS 

1250 ASc3) =". BB.AA.BB. 2250 IF JOYC2)=@ THEN 2210 

1270 ASC4H) =". .BBBAABBB.. ©2650 MOVEI, JOYC2),3,6,0,0 

1280 ASS) ="..BB.AA.BB.. :FOR T=1 TO 24 2270 GOTO 2210 

1230 ASCE) "A... :PRINT” = 2eB0 : 

1300 ASC7) ="... .AMAA.... NEXT 2230 REM KOLLISION 

1310 ASCB) ="....AAAN.... TIS-"000000” _ 2300 : 

1320 ÄAsca) ="! AMAA... 2 2310 NOMOVE 1:BLOCK 1,2 

1330 ASC1O)=".. .AMMAAR... REM SPRITES INITIALISIEREN 2315 FOR T=2 TO 4 

1340 ASC11)="BB ANBBAA.BB ; @316 :IF SCOLCTI=1 THEN NOMDVE T:BLOCK T,2 
1350 A$C12)="BB,ABBBBA.BB BLOCK1,0:BLOCK 2,1: PRINTCARS: PLAY1,0,2,1: POP: G0T01920 
1380 ASC13)="BBBABBBBABBB BLOCK 3,1:BLOCK4,1' 2320 NEXT T 

1370 ASC14)="BB.AnAAAA.BB MULTIO,1 2330 ADSR 1,56,10,0,0 

1388 ASC15)="BB..BBBB..BB COLOR 1,7:COLOR 2,8: 2349 WAVEI,3 

1390 ASC16)="..CCBBBECC.. COLOR 3,5:COLOR4,2 2350 BS-TIS 

1400 ASC17)=”, ‚LCCCCCCL. , 2368 PLAY 1,50,2,1 

1410 ASC1B)=". .CCCCEECC.. ee | re CARS-CARBN 

1420 ASC19)=", „CCCCCECC.. SETa\224 O.SKTu sn 0 2380 IF CARS-® THEN CURSOR 36,18: 

1430 FOR T=1 TO 19 ‚ ri 2083 23930 TIS=-Bs 

1448 :MPAT ASCT) MOVE 2,-90,2,FNACS),0,0 2400 POP:GOTO 1940 


Listing 2: Komplettes Spiel in Sprite-Basic » 


1 BORDER6: PAPER1"4: INKE 31 SPREDIT 14 N BLOCK1,13 
2 SPREDIT13 1 ETERERT ; ANIMATE 1,13,2,1 
NORA IR eek IS-BATRa a sanT TURN 1,1880,50,0 
Lk NND E SESBATT Tree RE. MOVE1,0,3,40,0,08 
CHEAT...» EHE Arch SSSRATr an ee ne . : 
TasLAT.: Ba BL IE 2 SEHRATE le era een . SHOW? ,8,8:COLOR2,6:5ET2,50, 150 
ANSRATL.. re ae 37 PAI"........w0sss,,,.., BLOCK2,13 
LSURAT 0 sine nn ER 38 PAT"##»,, ‚u... , ... ANIMATE 2,13,2,1 

PATH. EEE 0... 39 PAT” ©—|.— -.—-—— ‚... TURN 2,90,20,0 

PAT”... MM, ‚ae, ee, 4O PAT”, wm. MOVE2,0,3,28,0,0 

PAT”. „Miracle aan ara are a PAT”.. Summen u R 

PAT” ‚mm a, \ PAT”. © Tr SHOW3,8,2:COLOR3,1:SET3,0,8 

PAT”#M,, „Mm, are, , a PATSE ; ER BLOCK3, 13 

“.... BATre a. SE ANIMATE 3,13,2,19 
ne ,, PAT”.. = 7 MOVE3, -70,3,20,0,0 

BAT? > 


PAI?. 


PAI”. 

PAT”. 3 . 
RATTE. . . 
: BAT We WE ee 
. .. R PAI”......PmmE un... .,,,, 


188 SHOW1,8,2:COLOR1,2:SET1,100,100 


Listing 3: Demo zu den Befehlen ANIMATE und TURN 
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 Profi-Paket 
für Grafik-Power 


Die hochauflösende Grafik des 
C64 stellt eine Herausforderung 
für jeden Programmierer dar. Bei 
64000 einzeln ansprechbaren 
Punkten kommt man selbst in Ma- 
schinensprache bald an Lei- 
stungsgrenzen. Schnelle Rechen- 
verfahren sind also gefragt. Die 
‚Befehlserweiterung GRAFIX ver- 
wendet moderne Algorithmen, 
die sonst fast nur auf größeren 
Rechnern (wie dem Minicomputer 
VAX) zum Einsatz kommen. Ein- 
malig sind die Befehle für Splines, 
die die Kurvenprogrammierung 
wesentlich erleichtern. 

Im ganzen Programm wird nur in 
Integer-Arithmetik gerechnet, 
was zusammen mit den effizienten 
Algorithmen die hohe Zeichenge- 
schwindigkeit ergibt. Tabelle 1 
bringt einen Zeitvergleich mit Si- 
mon's Basic. 


Hires und Multicolor 
u see a ra nr 0 


Die Befehle von GRAFIX beziehen 
sich wahlweise auf die Hires- oder 
die Multicolor-Grafik. Zusätzlich 
sind noch einige Diskettenbefehle 
eingebaut. Die Kommandos ver- 
wenden folgende Parameter: 
Koordinatenbereich: 
Hires: 
x:0..319 
y:0.199 
Multicolor: 
x :0..159 
y.:0..199 
Parameter „mode' in fast allen Be- 
fehlen: 
Hires: 
0. = löschen 
nicht 0 = zeichen 
Multicolor: 
0 = löschen 
= zeichnen mit Farbe | 
2 = zeichnen mit Farbe 2 
3 = zeichnen mit Farbe 3 
4 = löschen mit Farbe 1 
5 = löschen mit Farbe2 _ 
6 = löschen mit Farbe 3 
Im folgenden werden die neuen 
Befehle beschrieben. 
Grafik ein-/ausschalten: 
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&chgr n schaltet: Grafikmodus n 


GRAFIX hat es insich: 
: n = 0 Textmodus 
Schnelle Algorithmen ess:nc 
n = 2 Multicolor 


ISSCHBMERESS SEIT 1 = 3 Keine Modusänderung, Be- 
fehle beziehen sich auf Hires 

n = 4 Keine Modusänderung, Be- 
fehle beziehen sich auf Multicolor 
Bitmap löschen: 


auf großen Rechnern 


geht. Sogar Befehle 


Hires: 
für Splines werden &erase Punktfarbe, Hintergrund- 
farbe i 
geboten. Multicolor: 


&erase Farbel, Farbe2, Farbe3, 


Bild 1: Mit Splines wird professionelle Grafik möglich 
G2(x2,y2) 


G4(x4,Y4) 


G3 
Gl (X3,Y3) 
(z1.yı) 


Bild 2: Zwei Splines verknüpft 
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Bild 3: Splines nach Zufall 


Bild 4: Splines simulieren komplexe Kurven 


HuSWAHL 


Bild 5: Texte beliebig breit und hoch 
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Hintergrundfarbe 

Gleichzeitig werden die Farben 
gesetzt. 

Farben ändern: 

&col gleiche Syntax wie &erase 
Punkt setzen: 

&dot x,y,mode 

Linie ziehen: 

&line x1,y1,x2,y2,mode 

Kreis zeichnen: 

&circle x,y,radius,mode 

x, y, Ist der Mittelpunkt. Es wird 
der Kreis-Algorithmus nach Max- 
well/Baker verwendet, Ein An- 
fangspunkt wird berechnet, dann 
werden die folgenden Punkte mit 
der Ableitung der Kreisgleichung 
berechnet. Es wird nur ein Vier- 
telkreis berechnet, alle vier Vier- 
telkreise aber gleichzeitig ge- 
zeichnet. Der Algorithmus liefert 
exakte Kreise. 


Kreisbögen und Radien 


Kreisbogen zeichnen: 

&arc x1,y1,x2,y2,x3,y3,r,mode 

xl, yl ist der Startpunkt, x3, y3 der 
Endpunkt. Der Kreisbogen wird 
im Uhrzeigersinn gezeichnet. x2, 
y2 ist ein beliebiger Punkt aufdem 
Kreisbogen (ungleich Start-/End- 
punkt). Der Mittelpunkt und der 
Radius werden intern berechnet. 

Bei einer Fehlermeldung liegt 
entweder der Mittelpunkt nicht 
im gültigen Koordinatenbereich, 
oder die drei Punkte bilden kei- 
nen Kreisbogen. Wenn der Para- 
meter r ungleich O0 ist, werden 
auch die zugehörigen Radien ge- 
zeichnet. Im Multicolormodus 
werden statt Kreisen und Kreisbö- 
gen Ellipsen und Ellipsenbögen 
gezeichnet. 


Splines: 

l. &bspline x1,y1,x2,x3,y3,x4,y4, 
g,mode 

2. &spline xl,y1,x2,y2,x3,y3,g, 
mode 


Was Splines sind und wozu sie 
dienen, wird im Kasten auf Seite 
38 erklärt, GRAFIX bietet zwei Be- 
fehle für Splines. Sie liefern das 
gleiche Ergebnis, geben die Form 
des Splines aber auf verschiede- 


ne Weisen an. 


Der erste Befehl &bspline benö- 


tigt die Koordinaten von vier Punk-> 
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ten. Bild 1 zeigt, wie daraus das 
Spline abgeleitet wird: Die Gera- 
den durch Pl und P2 und durch P3 
und P4 sind Tangenten (Berüh- 
rungsgeraden) des Splines. Die 
zwei Berührungspunkte Pl und P4 
sind gleichzeitig sein Anfangs- 
und sein Endpunkt. Dazwischen 
spannt sich der Bogen des Spli- 
nes. Er berührt die Strecke P2P3 
in ihrem Mittelpunkt. 

Beim zweiten Befehl &spline wer- 
den nur drei Punkte angegeben, 
die sogenannten „guiding points" 
(siehe Bild 1). G2 ist der Schnitt- 
punkt der beiden oben beschrie- 
benen Tangenten. Gl und G3 lie- 
gen auf je einer der Tangenten. 


Sieben Punkte für 


einen Spline 
u nn 


GRAFIX berechnet beim zweiten 
Befehl die Punkte Pl bis P4 aus 
den Werten für Gl, G2 und G3. 
Die Beziehung der sieben Punkte 
untereinander ist dabei folgende: 
Pl ist der Mittelpunkt der Strecke 
G1-G2. Das rechte Teilstück PI- 
G2 wird wiederum von P2 hal- 
biert. Entsprechend sind die Ver- 
hältnisse für die zweite Tangente. 
Splines werden aus Geradenstük- 
ken zusammengesetzt, Der vor- 
letzte Parameter g gibt dafür die 
Genauigkeit an (g = 0 maximal). 
Mit wachsendem qg werden die 
Geradenstücke immer größer 
und die Genauigkeit geringer. 
Der höchste erlaubte Wert für g 
ist 125. Selbst bei höchster Genau- 
igkeit werden die Splines noch 
schneller gemalt als Kreise in 
manchen anderen Grafikerweite- 
rungen! 

Die Spline-Befehle sehen anfangs 
recht kompliziert aus. Mit ein we- 
nig Übung entwickelt man aber 
schnell ein Gespür für die richtige 
Punktwahl. 

Durch Aneinanderhängen von 
Splines können beliebige Kurven 
erzeugt werden. Bild 2 zeigt ein 
Beispiel: Die Kurve kann in zwei 
Splines zerlegt werden: 

&spline x1,y1,x2,y2,x3,y3,9,n 

und 

&spline x2,y2,x3,y3,x4,y4,g,m - 
Der Übergang zwischen den bei- 
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den Splines verläuft völlig sanft, 
da beide Kurven im Übergangs- 
punkt dieselbe Tangente G2-G3 
haben. Die Gesamtkurve sieht da- 
durch aus wie aus einem Guß. 
Bild 3 zeigt eine Kette von zufälli- 
gen Splines. Bild 4 ist aus Splines, 
einigen zusätzlichen Geraden und 
einem Kreis für den I-Punkt :zu- 
sammengesetzt: Das Programm 
für Bild 4 ist in Listing 3 abge- 
druckt. 


Profi-Paket für 


Grafik-Power 


Eee ee er 

Fill: 

&fill x,y‚mode 

Füllt beliebige Figuren mittels Sta- 
pel. Das Füllen beginnt beim 
Punkt x,y. Im Multicolor-Modus 
bleiben Ränder erhalten, wenn 
mit einer anderen Farbe gefüllt 
wird. 

Parallelogramm: 

&par x1,y1l,x2,y2,x3,y3,mode 

Der vierte Punkt des Parallelo- 
gramms wird berechnet. 
Rechteck: 

&rect x,y,1x,ly‚,mode 

Entspricht: &par x,y+1lyx,yXx+ 
lx,,mode. 

Text in die Bitmap: 

l. &char x,y‚char-nr,xsize ‚8120, 
offset,mode 

Bringt Zeichen Nummer char-nr 
mit dem Vergrößerungsfaktoren 
xsize, ysize an die Stellex, y, in die 
Bitmap. Offset ist das Highbyte 
der Startadresse des Zeichensat- 
zes. (Standard Groß/Grafik 208, 
Groß/Klein 216.) 

2. &text x,y,s$,xsize,ysize,offset,s, 
mode 

Wie 1., bringt aber eine ganze Zei- 


100 Kreis .. l8sec 
320 Linien 
komplexes 
Pag esse 
zeichnen Er 
ee = nBSec 


Tabelle IE Deiveisich zwischen 
GRAFIX und Simon’s Basic 
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chenkette (s$) in die Bitmap. Falls 
s ungleich 0 ist, wird der Text 
senkrecht gedruckt, sonst waage- 
recht. 
Bei den beiden Textbefehlen 
kann auch ein anderer Zeichen- 
satz verwendet werden. Dazu muß 
der neue Character Set geladen 
und seine Startadresse in Offset 
eingesetzt werden. 


Bild 5 zeigt ein Menü, das mit Hilfe 
des &text-Befehls aus neu defi- 
nierten und vergrößerten Zeichen 
erzeugt wurde. 

Invertieren der Bitmap: 

&inv 

Diskbefehle: 

&load s$ &save s$ 
Lädt/speichert die Bitmap unter 
dem Namen s$ auf die Disk. 

&dir zeigt Directory an. Unterbre- 
chen mit RUN/STOP. 

&disk s$ sendet den String s$ an 
die Disk. 

$status zeigt die ang der 
Disk an. 


Was sind Splines? 
Splines spielen eine wichtige 
Rolle im Bereich des Computer. 
‚Aided Design (CAD). Mit ihrer 
Hilfe wird ein Kurvenverlauf an 
vorgegebene Punkte. ‚angepaßt. 
Schon lange, bevor es Compu- 
ter gab, standen Konstrukteure, 
vor diesem Pro) »blem. Teilweise 
löste man die Aufgabe mecha- 
nisch: An den gewünschten Ko- 
ordinatenpunkten. schlug. man 
Nägel in eine Holzwand. Zwi- 
‚schen diese Nägel spannte ne 


dann auf ‚Papier übertragen. ; 
Heute erreicht man dasselbe 


Ergebnis bequemer mit Com- 
m erhilfe. Die en 


Hilfsfunktion: 

&help zeigt alle Befehlsnamen an. 
Mit Datenspeichern und  User- 
stack belegt GRAFIX 11 KBytes 
von $a000 bis $cc00, also keinen 
Basicspeicherplatz. Der Farbspei- 
cher liegt von $cc00 bis $cfff und 
die Bitmap ab $e000. 

Listing 2 ist ein Demo-Programm. 
Listing 1 ist der kombinierte Hex- 


dump-Basiclader von GRAFIX. Wie 
man mit dieser Art von Listing um- 
geht, steht auf Seite 6. Wird das 
Programm als Basiclader einge- 
geben, so muß es vor dem Start 
abgespeichert werden. Nach dem 
Einpoken der Daten kann das fer- 
tige Maschinenprogramm mit 
POKE 43, 1:POKE 44,8 

POKE 45, 203:POKE 46, 44 


SAVE "NAME"“, 8 

auf Diskette abgespeichert wer- 
den. Wird es als Hexdump einge- 
geben, so muß der Checker be- 
nutzt werden. Als Startadresse ist 
0801 anzugeben. GRAFIX wird mit 
LOAD..,3 geladen. Nach dem 
Start mit RUN verschiebt es sich 
an seinen endgültigen Platz und 
initialisiert sich. 


0C,928,C1,07,39E.20.32,30, 
35,32,00,.08,008,A3,00,8D, 
20,00,80,21,D0,A2.11,AD, 
08.BD,3F,08,F0.03.99,58, 
00.CA,88,10,F4,8A,48,20, 
BB,A3.68,AA.,10,E9,20,08, 
C0,20,44,A6,A9.51,A0,08, 
EO,1E,AB,4C.86.E3,87,BB, 
S2,24,00,.00.00,CB,08,63, 
C8.BB,2C,00,00.00,52,24, 
93,9E,0E,08.00,20,20,20, 
20,.28.20,29,20,20.20,28, 
20,20,20.C7,20,02,20,C1, 
20,C6,20.C9.20,08,0D,0D, 
20,20,20,28,43.29,20.31, 
39,38,35,28,20.20,C07.45, 
4F,52,47,20.D2.,55,50,50, 
45,52,54,0D,20,20,20,20, 
20,20,20,20,20.20,20,20. 
28,20,CD.4F,52.45,4C,4C, 
45 ,4E,46.45,4C.44,47,41, 
53,53,45.20.31.35.0D.20. 
20.20,20,20.20,20.20,20, 
29,20.29.20.20.C1.20.38, 
30,.31,30,290.C7,52,41,5A, 
0D.00,AD,11,D0,09,20,8D, 
11,D0,.AD,16,00,29,EF,8D, 
16.DO,AD,18,D0,09,38,8D, 
18,D0,AD,00,D0D,29,FC,8D, 
‚00,.DD,A9,63,8D0,B7.C0.rS, 
A1.80,88,C0,A9,BE.8D,BA, 
CO,A93,C1,80,BB.,CO,r9,1E, 
80.1B,Al,A9.Al,8D.1IC,Al, 
n9,C2,80,BD,CO,A3,C1,8D, 
BE,CO,AS,E0.BD,C8,C0.A9, 
C1,80,C1,C0.A9,AF,8D,C3, 
C0,A9.B3,80,C4,C0,A9,80. 
80,C5,C0,A9.02,8D,C6,C0,. 
AS,40,80.C7.C0.A9.01.8D, 
C8,C0,R39,2090,80,C9,C0.60, 
20,00.A0.AD,21,00,8D,DD, 
AO,AD.16.080,03.10,8D,16, 
D0,49.D5.80,E7.C0,A9,Al, 
80,B8,C0,A9.AB.8D,BA,Co, 
A9S,C1.8D.BB,C9.R9.38.8D. 
1B,Al,A9.Al.BD,.IC,ALl.Rg, 
D1.80,ED.C®,A9.C1,8D,BE, 
C8,A9,ED.80.C0.C0.rS,.cı, 
8D0,C1,C0,A9,B4,8D0,C3,C0, 
AS3,B7,8D,C4.C0,A9,40,8D, 
CS,C0,R9,01,80,C6,C0,A3, 
AB,80,C7,C0,R9,00,80,C8B, 
C0,AS,21,8D0,C9,C0,60,00, 
AD,02,0D0,83,23,8D,80,DD, 
AD,18,08,29,D7,80,18,D0, 
AD,16,D8,29,EF,8D,16,D®, 
AD,11,D0,29,DF,8D,11,D®, 
AD,DD,AQ,8D,21,D00,560,%A3, 
00,85,FBE.A0,E0,84,FC,AB, 
91,FB,C8,08,FB.E6,FC,D®, 
F7,29,00,C9.4C,1E,A1,00, 
AB,00.AD,ID,Al,A2D.CC,BE, 
2C,A1,R2.04,39,08.CC.CB, 


DATA DO,FA,EE,.2C,Al,CA,DO,F4, 
DATA 60,900,AD,37,A1.8D,21,D0. 
DATA AB,00,A2,CC,8E,50,Al,Re, 
DATA D8,8E.55,Al,A2,04,A5,96, 
DATA S3,00,CC,AS,9B,39.00,D8, 
DATA C8,D00,F3,EE,50.Al,EE,SS, 
DATA Al,CA,DO,ER,60.48,.29,FB, 
DATA BS,FD.68,29,07.85,A4, 38, 
DATA 29,01,A8,BA,48,29,FB,R2, 
DATA 00,86, FE,06,FD.26,FE,06, 
DATA FD,26,FE,06,FD,26,FE,65, 
DATA FD,30,02.C8,18,65,A4,48, 
DATA 98,65, FE,69,E0,A8,68,06, 
DATA FD,26,FE,06,FD,26,FE,65, 
DATA FD,85,FD,38,65.FE.85,FE, 
DATA C3,E0.30,11,A0,00,68,29, 
DATA 07,A6.02.00,09.AA,Bl.FD, 
DATA 3D.CD,A1,91.FD.60,AA,Bl, 
DATA FD,1D,C5,Al,91.FD.60,88, 
DATA 40,20,10,08,04.02,01,7F, 
DATA BF.DF,EF,F7,FB,FD,FE.48, 
DATA 29,F8,85,FD,68,29,07,85, 
DATA A4,BA,0A,48,98,2n,29,01, 
DATA AB,68,48,29,F8,A2,00,86, 
DATA FE,06,FD.26,FE,06.FD,26, 
DATA FE,06,FD,26,FE,65,FD,30, 
DATA 02,C8,18.65,A4,48,98,65, 
DATA FE,69,E0,A8,68,06,FD,26, 
DATA FE,06,FD,26.FE.65,FD,85, 
DATA FD,38,65,FE,85,FE,C9,EO®, 
DATA 32,3B,A0,00.68.29,07,4n, 
DATA N6.02.E9.01.00.0E,AA, BD. 
DATA BA.AD,43,FF,31,FD,1D.82, 
DATA A2.51,FD,60,E0,02.00.0£E, 
DATA AA.BD,BA.A2.49,FF,31,FD, 
DATA 1D.86,A2.91,FD,60,E9,03. 
DATA D0,09,AA,Bl,FD,ı1D,Bn.r2, 
DATA 91,FD,60,E0,04,00,0B,An, 
DATA BD.82,A2.43,FF,31,FD,91, 
DATA FD.60,E0,05,D0,0B.AA” BD, 
DATA 86.A2,49,FF,31,FD,S1,FD, 
DATA 60,AA,ED,BA,A2,49,FF,31, 
DATA FD,S1.FD.60.40,10.04,01, 
DATA 89,20,08.02.C0,30,0C,23. 
DATA 00.00.00,.00.08,00,rD,31, 
DATA A2,CD,BE,A2,AD,32,A2.ED, 
DATA BF,A2,BO,24,AD,BE,A2,AC, 
DATA 91,A2,8D,91,A2,8C,BE,r2. 
DATA AD,BF,A2,AC,92,A2,80,32, 
DATA A2,BC.BF,A2,AD,S0,A2,AC; 
DATA 93,A2,80,93,A2,8C,30.R2, 
DATA AD.S1,A2,38,ED,8E,A2,85S, 
DATA A7,AD,32,A2,ED,8F,A2,85, 
DATA AB,A9,09,85,AA,AD,33,R2, 
DATA 38,ED,30,A2,85,49,B0,®2, 
DATA C5,AA,AD,BE,A2,85,BP,AD, 
DATA BF,A2,85,B3.AD,530,n2,85, 
DATA B4,AS,AA,30.03.4C,F1,A3, 
DATA AS,AS,49,FF,85,A9,AS,An, 
DATA 4S,FF,85,AA,E6,49,00,02, 
DATA ES,AA,AS.A7,C5,A9,AS,RAB, 
DATA ES,AA,B0,62,45.49,85,BS. 
DATA E5,B5,A5.A9,85.B0,19,00, 
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85,B1,A5,B8,49,FF,85,BD®. D7,A4,093,80,8D0,D7,A4,®E, 
AS,B1,49,FF,85,B1,E6,BO, D8,A4,2E,D9,A4,90,08,AD, 
DO,02,E6,B1,18,A5,B1,1®, D3,A4,29,80,80,D9,A4,0E, 
01,38,66,B1,66.B0,AS,B5, DA,A4,2ZE,DB,A4,90,08,AD, 
FO.GE,AB,B2,A4,B3,A5S,B4, 57 DB,A4,09,80,80,DB,A4,OE, 
28,B6,C0,C6,B4,A5,.B9,18, DC,A4,2E,DD,A4,90,08,AD, 
65,A7,85,B0.AS,B1,65,A8, DD,A4,89,80,8D0,DD,A4,OE, 
85,Bl,R5,B1,30,13,E6,B2, DE,A4,2ZE,DF,A4,A2,08,AD, 
D0,02,E6,83,A5,B9,38,ES, DF,A4,D0,18,CA,AD,DE,A4, 
A9,85,B0,A5,B1,E5,AA,85, C9,0E,D0,02,A9,10,04,BP, 
B1,C6,B5,4C,44,A3,A5,A7, 83,CA,DO,FA,BD,E®,A4,85, 
85,B5,15,n8,85,B6,E6,BS, C BO,85,B2,BD,EA,A4,85,B1, 
D0,02.E6,B6.A5.17.85,B0. 85,23,n5,B0,85,An,A5,Bl, 
AS,AB,85.81,n5,B0,48, FF, 85,AB,06,AA,26,AB,AS,AN, 
85,20,A5,B1,49,FF,85,Bl, B5,AC,nS,AB,8B5,AD,AS,AC, 
E6,B8,00.02,E6,B1,18,#5, D2,02.C6,AD,C6,AC,AD,DS, 
B1,10,01,38,66,B1,66,E0, A4,85,96,AD,D7,n4,85,97, 
AS,B5S,D8,05,A5,B6,08,01, 7 AD,D8,A4,85,98,AD,D3,R4, 
60,AE,B2.A4,B3,n5,BY4,20, 85,9C,1R9,00,.85,9E,49,10, 
BE,CO,E6.B2,09.02,E6,8B3. 85,9F,R9,03,85,B4,15,56, 
AS,B0,18,65,19,85,50,n5, D? C5,9E.D9,15,A5,9B,C5,A4,, 
Bl}65,AA,85,B1,A5,B1,30, DO,0F,A5,37,C5,9F,D®,09, 
OF,C6,E4,AS,58,38,ES,97, AS,3C,C5,AS,D0,03,4C,F9, 
85,B®0,A5,B1.E5,RB,85,B1, AG,AS,S6,8D,F4,A4,AS,97, 
A5,BS5,D0.02,.C6,86,C6,85, 8D.F5,A4,AS,SB,BD,F6&,AH4, 
YC,AE,A3.AS,A7,C5,Ag,AS. ; AS,3C,8D.F7,A4,20,FB,AH4, 
AB,ES,AR,E0,62,45.19,85, AS,SB,43,FF,8D,F4,A4,AS, 
BS,E6,E5.A5,A9,85,B8.R39, SC,49,FF,8D,FS,A4,EE,F#4, 
00.85,B1,A5,B8,49,FF,55, A4,D8,@3,EE,FS,A4,A5,96, 
BB,AS,B1.49,FF.85,B1,ES, 8D,F&6,A4,AS,97,80,F7,Ru4, 
EO,D8,02,E6,E1,18,A5,Bl, 20, FB,A4,AS,96,49,FF,8D, 
18.01.38.66,B1,66,BB8.A5, F4,A4,A5,37,49,FF,8D,FS, 
BS,F@,SE.AG,B2,A4,E3,#5, A4,EE,F4,A4,D9,03,EE,FS, 
B4.20,B5,C0,E5,B4,AS.E®, A4,AS,9B,43,FF,BD,F6,A4, 
18,65,47.85,58,45,B1,65, AS,SC;,4S.FF,8D,F7,A4,EE, 
AB,85,B1,45,B1,38,13,E6, F6,A4,0D2,03,EE,F7,A4,20, 
E2.08,02.E5,83,A5,E0.38, & F8,A4,AS,93B,8D0,F4,A4,AS, 
ES.A9,85,B8,R5,B1,ES.An. SC,8D,F5S,A4,A5,96,49, FF, 
85,B1,C6.55,4C,25,A4,AS, 8D0,F6,A4,A5,937,49,FF,BD, 
A7,85,8B5,45,R8B,85,B6,.ES, F7,A4,EE,F6,A4,D@,03,EE, 
BS.00,92.E5,B6.AS,17,85, 7,A4,20,FB,A4,A5,96,55, 
BO.AS,AB.85,B1,A5,B8,48, SE,AS,37,85,9F,AS,9B,65, 
FF,85,5E0.A5,B1,49,FF,85, A4,AS,SC,85,A5,AS,B4,F0, 
81,E6,E0,09,02.E6,Bl,18, 06,C6,E4,A5,B4,08,1D,#S, 
AS,E1,10,01,38.66,Bi,566, 96,CD,DA,A4,D8,16,AS,5B, 
BBO.,AS.BS,D8.05,A5,B6,D0, 3 CD,DE,A4,DO,0F,A5,37,CD, 
01,60,n6.E2,R4,B3,n5,.B4, 77 DB,A4,D®,08,A5,3C,CD,DD, 
20,B6,CO,E6.,B2,D8,02,E6, A4,D0,01,60,A5,B0,18,65, 
B3,A5,50,18,65,49,85,E9. 37 96,85,B98,A5,B1,65,97,85, 
AS,Bl,65,AR,85,B1,AS,Bl, 7? B1,A3,00,85,A5,A3,00,85, 
30,0F,E6,B4,A5,B@,38,ES, A7,Rr4,B8O,AS,B1l,CH,AA,ES, 
A7,85,B0,AS,B1,ES,AB,65, AB,19,1C,A5,B1,10,2C,49, 
Bl.A5,85,09,02,C6,56,C6, FE,85,A6,AS,FF,85,A7,AS5, 
BS,4C,8F,A4,20,00,20,00, BO,18,65,AA,85,B®,AS,Bi, 
00,00,00,00,00,00,00,00, 65,AB,85,B1,4C,69,R7,A9, 
00,020,01,02,04,08,10,20, 02,85,A6,49,00,85,A7,A5, 
49,80,00,00,00,00,00,00, BO,25,AC,85,B8,AS,Bl,05, 
00,00,00,20,01,02,00,00, AD,BS,Bl,A5,B2,18,65,9B, 
00,00,AD,C9,C0,F®,0D,18, 85,B2,A5,B3,65,9C,85,B3, 
AD,F5,A4,10,01,38,6E,FS, A93,00.85,AB,A9,00,85,n9, 
A4,6E,F4,A4,AD,F6,A4,AC, A4,B2,R5,B3,C4H,AA,ES,AB, 
F7,A4,18,6D,D4,A4,48,S8, 10,1C,AS,B3,10,2C,A9,FE, 
6D,D5.A4,AB,68,AA,SB,EO, 5 85,AB,A9,FF,85,A9,AS,Be, 
30.E9.01,99,01,60,84R,4B, 18,65,AN,85,B2,45,B3,65, 
gB.4A,6B,6A,4B,AD,F4,A4, AB.85.B3,4C,B8,47,19,02, 
AC,FS,A4,18,60,D2,n4,4B, 85,A8,A9,00,85,A9,A5,B2. 
98,60,03,n4,N8,58,AA,S8, e5,AC,85,B2,R5,B3,25,RAD, 
EC,C5,C0,ED,C6,C0,30,02, 85,B3,15,96,38,E5,A8,85, 
68.60, 8N,48,38,4A,AB,68, 96,45,97,E5,A9,85,97,95, 
ER,AA,6B.20,8B6.C00,60,AD, SB,18,65,16,85,98,nS,39C, 
DE,A4,D®,0C,AD,D4.A4,AE, 65,47,85,9C,18,A5,97,10, 
De ,AY,AC,D3,RA4.4C,B6,C0, 01,38.66,47,66,A6,18,#5, 
A9,08,8D0,DF,A4,8D,D8B,A4, A3,10,01.38,66,49,56,A8, 
8D0,DS,A4,BD,DA,A4,8D,DE, AS.BO,38,E5,18,85,B9,AS, 
A4,AD,DE,AY.AC,DF,A4,BD, B1,E5S,A9,85,B1,A5,B2,18B, 
DE.A4.8C,D7,R4,8D,.DC,n4. 65,A6,85.B2,n5,B3,65,R7, 
BC,DD,A4.BE,D2,A4,2E,D3, 85,B3,4C,3C,A6,A2,08,8E, 
A4,QOE,D4,A4,2E,DS,A4,BE, 40,03,8E,41,83,8E,4?,03, 
D6,A4,2E,07,R4,30,08, AD, AD,3D,83.19,20,AD,42,03, 
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49,FF,8D,42,903,AD,3C,03, 
39,FF,8D,3C,03,AD,3D,03, 
49,EF,8D,3D,03,EE,3C,03. 
D8,03,EE,3D.03,AD,3F,03, 
190,20,AD,42,03.49,FF,8D, 
42,03,AD,3E,03,43,FF,ED, 
3E,03.AD,3F.03,.49,FF,8D, 
3F,03,EE,3E,03,D8,03,EE. 
3F,03,ABd,18,D8.13,18.AD, 
40,03.60,3E,03,8D,49,93, 
AD,41,23,6D,3F,03,8D,41, 
83,4E,41,03,6E,40,03,6E, 
3D0,03,6E,3C,03.88,38,04, 
S@,EF.BO,DA,AD,42,03,FD, 
18,AD,3C,03,49,FF,8D,3C, 
83,AD,3D,03,49,FF,8D,3D, 
03,EE,3C,03,00,03,EE,3D, 
03,60,A2,00,8E,48,03,BE, 
41,03,8E,42,03,AD,3D,03, 
10,20,ANn,42,83,49,FF,8D, 
42,03,AD,3C,03,49,FF,8D, 
3C,03,AD,3D,03,49,FF,8D, 
3D,03,EE,3C,83,D8,03,EE, 
3D,83,AD,3F,83,10,28,AD, 
42,03,49,FF,8D,42,03,AD, 
3E,03,49,FF,8D,3E,03;AD, 
3F,03,49,FF,8D,3F,03,EE, 
3E,83,D0,03,EE,3F,03,AB, 
10,0E,3C,03,2E,3D,03,2E, 
40.03,2E,41,03,38,AD,40, 
03,ED,3E,83,AA,AD,41,03, 
ED,3F,23,90,89,8E,40,03, 
8D,41,03,EE,3C,03,88,D®, 
D8,AD,42,03,F0,1B,AD,3C, 
03,49.FF,8D,3C,03,AD,3D, 
03,43,FF,80,3D,03,EE,3C, 
03,00,03,EE,3D0.03,60,00, 
00,20,00,08,00,00,00,00, 
00,00,00,00,00,00,00,00, 
00,00.09.00,00.00,00,00, 
00,20,00,00,00,00,09,20. 
00,00,20,00,AD,3D,A9,18, 
6D0,41,R9,8D0,49,A9,AD,3E, 
A3,6D,42,A9,8D,4A,AS,4E, 
YA,A9,BE,43,.A9,AD,3F,AS, 
18,6D0,43,A9,8D,4B,AS,AD, 
40,A9,6D,44,A9,8D,4C,AS, 
YE,4C,AS,6E,4B,AS,AD,41, 
A9,18,6D0,45,A9,8D,4D,A9, 
AD,42,A9,6D0,46,A9,8D,4E, 
A9,4E,4E,AS,6GE,4D,AS,AD, 
43,A9,18,60,47,A9,8D,4F, 
AI,AD,44,R9,6D0,48,A9,8D, 
50,A9,4E,58,A9,6E,4F,ASg, 
AD,43,A9,38,ED,3F,A9,8D, 
S1,A9,AD,44,A9,ED,40,A9, 
BD ,S2,ASTADZST, AS, HSTER, 
8D,51,A9,AD,52,A9,49,FF, 
8D0,52,A9,EE,51,A9,D9,03, 
EE,S2,AS,AD,41,A9,38,ED, 
3D,A9,80,53,A93,AD,42,A9, 
ED,3E,A9,BD,54,A3,AD,47, 
A9,38,ED,43,A9,8D0,55,49, 
AD,48,AS,ED,44,A9,8D,56, 
AS,AD,SS,A9,43,FF,8D,55, 
A9,AD,S6,49,493,FF,8D,56, 
AS,EE,SS,A9,D8,03,EE,56, 
A3,AD,45,A9,38,ED,41,A9, 
8D,57,AS,AD,46,A9,ED,42, 
AS,8D,S8,A9,AD,43,A9,38, 
ED,4D,AS,8D,59,A9,AD,“4A, 
A9,ED,4E,A93,8D0,5A,A9,AD, 
4B,A9,38,ED,4F,A9S,8D,5B, 
AS,AD,4C,A9,ED,59,A9,8D, 
SC,AS,AD,S9,A9,8D,3C,03, 
AD,SA,A9,80,3D,03,AD,53, 
AS,8D,3E,23,AD,S4,A9,8D, 
3F,03,20,803,A8,AD,3C,03, 
8D,5D,AS,AD,30,83,8D,SE, 
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3649 
3658 
3668 
3678 
3688 
3699 
3798 
3710 
3728 
3739 
37423 
3750 
3768 
3770 
3788 
3790 
3808 


3810 
3820 
3830 
3840 
3850 
3869 
3870 
3889 
3830 
3998 
3918 
3920 
33930 
3348 
3358 
3360 
39370 
3388 
3990 


4202 
4218 
4020 
4030 
4040 
4050 
4060 
4070 
4088 
4090 
4108 
4110 
4128 
4130 
4148 
4150 
4168 
4170 
4180 
4190 
42028 
4218 
4220 
4238 
424B 
4250 
4260 
4270 
4289 
4238 
4308 
4319 
4320 
4338 
4340 
4358 
43568 
4370 
4380 
4339 
4490 
4418 
4420 


AS,AD,S1,A9,8D,3C;23,AD, 
52,R93,80,3D,23,AD,5B,A9; 
8D,3E,03,AD,5SC,A9,8D,3F, 
83,20,03,AB,AD,SD,AS,38, 
ED,3C,03,8D0,5D,AS,AD,SE, 
AS,ED,3D,03.8D,5E,A9,AD, 
5D,A9,D0,08,AD,5E,A9,D2, 
03,4C,ED,C4,AD,51,A9,BD, 
3C,83,AD,52,A9,8D,30:83, 
AD,57,A3,8D.3E,03,AD,58, 
A3.8D,3F,803,20,03,A8,AD, 
3C,83,8D0,5F,A9,AD,3D,03, 
8D,60.A3,AD,55,49,8D,3C, 
03,AD,56,A9.8D0,3D,03,AD, 
53,A93,8D,3E,03,AD,54,A9, 
80,3F,03,20,03,AB8,AD,SF, 
A9.38,ED,3C,03,8D,5F,49.' 


AD,50,A9,ED,3D,03,8D,60, 
A9S,AD,SF,AS,02,28,AD,60, 
AS,D®,03,4C,F3,C4,AD,SE, 
AS,F®,04,C9,FF,D0,09,AD, 
60,A9,F0,21,C9,FF,FO@,1D, 
18,AD,SE,AS9,10,01,38,6E, 
SE,A9S,6E,5D,A9,18,AD,60, 
AS,18,01,38,6E,60,A9,6E, 
SF,AS,4C,2C,AB,AD,SD,Ag, 
8D,3C,03,AD,5E,A9,80,3D, 
03,AD,SS,A9,80,3E,03,AD, 
S6,49,80,3F,03,20,03,A8, 
AD,SF,AS,8D0,3E,03,AD,60, 
AS,BD,3F,03,20,AB,A8,nD, 
4D,A9,38,ED,3C,03,8D,D2, 
A4,AD,4E,A9,ED,3D,03,8D, 
D3,A4,AD,SD,A9,80,3C,03, 
AD,SE,AS,80,3D0,03,AD,57, 
AS,8D,3E,03,AD,58,A9,8D, 
3F,03,20,03,AB,AD,5F,A9, 
80,3E,03,AD,60,A9,8D,3F, 
03,20,ABd,AB,AD,4F,A9,38, 
ED,3C,03,80,D4,A4,AD,50, 
AS,ED,3D,83,80.D5,n4,AD, 
D2,A4,CD,C7,C0,AD,D3,A4, 
ED,C8,C0,30,23,4C,ED,CH, 
AD,D4,A4,C9,C8B,90,03,4C, 
ED,C4,AD,DS,A4,F@,03,4C, 
ED,C4,AD,3D,A9,38,ED,D2, 
A4,8D0,D6,A4,AD,3E,A9,ED, 
D3,A4,80,D7,A4,AD,3F,AS, 
38,ED,D4,A4,8D,D8,A4,AD, 
40,A9,ED,DS,A4,8D,DS,A4, 
AD,45,A9,38,ED,D2,A4,BD, 
DA,A4H,AD,46,A9,ED,D3,A4, 
8D,DB,A4,AD,47,A9,38,ED, 
D4,A4,8D,DC,A4,AD,4B,A3, 
ED,DS,A4,8D,DD,A4,AD,DE, 
A4,8D,DE,A4,AD,D7,A4,BD, 
DF,A4,AD,DF,A4,19,18,AD, 
DE,A4,43,FF,BD,DE,A4,AD, 
DF,A4,49,FF,BD,DF,A4,EE, 
DE,A4,D0,03,EE,DF,A4,AD, 
D93,A4,10,16,AD,DE,A4,38B, 
ED,D8,A4,80,DE,A4,AD,DF, 
A4,ED,D3,A4,8D,DF,A4,4C, 
SB,AC,AD,DE,A4,18,6D,D8, 
A4.8D,DE,A4,AD,DF,A4,6D, 
DS,A4,8D,DF,A4,AD,61,#9, 
D8,03,4C,3B,AD,AD,D6,A4, 
8D,8E,A2,AD,D7,A4,8D,8F, 
A2,AD,3F,A93,8D,90,A2,AD, 
D2,A4,8D,91,A2,AD,D3,RA4, 
8D,92,A2,AD,D4,A4,80,93, 
A2,AD,C9,CQ,F®,00,1B,AD, 
BF,A2,10,01,38,6E,8F,r2, 
GE,BE,A2,AD,BE,A2,1B,6D, 
D2,A4,80,BE,A2,AD,BF,R2, 
E6D,D3,A4,8D0,8F,A2,20,54, 
A2,AD,DA,A4,ED,BE,A2,AD, 
DB,A4,8D,BF,A2,AD,47,A9, 
80,99,A2,AD,D2,A4,8BD,3l, 
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1SD1 4438 DATA A2,AD,D3,A4,8D,92,A2,AD, 14 
1509 4448 DATA D4,R4,8D,93,A2,AD,C9,CB, 28 
1SEl 4459 DATA FO,0D,18,AD,8F,A2,10,01, 4A 
15SE9 4468 DATA 38,6E,8F,A2,6E,8E.A2,AD, 8C 
ıSF1 4470 DATA BE,A2,18,60.D2,A4,8D,8E, C4 
ı15SF9 4489 DATA A2,AD,BF,A2.6D,D3.A4,8D, 33 
15601 4498 DATA 8F,A2,20,94,A2,0E,D2,At4, 3B 


1609 4590 DATA 2ZE,D3.A4,BOE.,D4,A4.2E.DS, 7A 
\G611 4519 DATA A4,9E,DE,AU,ZE,D7,A4,S30. 33 
1619 4520: DATA 08,nD,07,n4,09,890.80,D07, CE 
1621 4530 DATA A4,OE,DB,A4,2E,DI,A4,SO, 33 
1623 4540 DATA 98,ND,D9,A4.,09,80,8D,09, CE 
1639 4558.DATA 08,AD,DB,A4Y,05,88,80,DB, CE 
1641 4570 DATA A4,DE,DC,A4,2E,DD,A4,SO, 33 
16493 4580 DATA 08,AD,DD,A4,09,80,8D,DD, CE 
1651 4590 DATA A4,OE,DE,A4,2E,DF,A4,A2, 21 


1659 4698 DATA BO8,AD,DF,A4H,D®B,18,CA,nD, 72 
1661 4619 DATA DE,A4,CS,0E,DO,02,43,10, 5A 
1669 NH628 DATA 0A,B0,03,CA,D®,FA,BD,E®d, 47 
1671 4630 DATA A4,85,B0,85,B2,BD,EA,A4, 84 
167 yE4B DATA 85,81,85,E3,45,B2,85,AA, 76 
1681 . 4650 DATA AS,Bl,85,AB,06,AA,26,RB, A5 
1683 46698 DATA AS,AA,85,AC,AS,AB,85,AD, A5 
1631 45670 DATA AS,AC,DB,02,C6,AD,C6,AC, FS 
15393 45680 DATA AD,D6,R4,85,96,AD,D?,r4, 12 
16Al 46908 DATA 85,37,RD,D8,A4,8B5,9B,AD, DO 
16A3 4788 DATA DI,A4,85,9C,49,09,85,8E. AD 
16B1 4710 DATA AS,10,85,3F,A9,03,85,B4, FS 
16B9 4728 DATA A5S,S6,C5,9E.D8,15,A5,3B. FA 
16C1 4738 DATA C5,A4,DO,0F,AS,S7,C5,SF, 15 
16C9 4748 DATA D®,03,A5,3C,C5,A5,D8,03, BC 
16D1 4758 DATA 4C,36,AE,A5,36,BD,F4,A4t, 77 
1609 4760 DATA AS,97,8D,FS,R4,A5,SB,8D, E3 
iBE1 4778 DATA F6,A4,A5,SC,8D,F7,A4,20, 75 
16E9 4788 DATA FB,A4,AS,936,85,9E,A5,97, 58 
«1BEFl 4798 DATA 85,9F,A5,938,85,A4,AS,SE, DA 
16F9. 4808 DATA 85,A5,AS,B4,F8,806,C6,B4, CC 
1701 4812 DATA AS,B4,D0,51,A5,956,A4,57, 8B 
1709 .4B20 DATA 38,ED,DA,A4,48,9B,ED,DB, 43 
1711 4838 DATA A4,10,0F,49,FF,AB,68,49, EF 
1719 NM4B4@ DATA FF,18,69,01,90,86,6C8,4C, 53 
1721 4858 DATA SA,AE,AB,68,C0,00,D08,2D, 4E 
1723 4868 DATA C9,03,89,29,R5,9B,A4,SC, SE 
1731 4878 DATA 38,ED,DE,A4,48,98,ED,DD, “+3 
1739 4888 DATA A4,10,0F,49,FF,A8,68,49, CF 
1741 4830 DATA FF,18,63,01,30,06,C8,4C, 53 
1749. 4908. DATA B2,AE,AB,68,0C0,09,080,05, SE 
1751 4918 DATA C3,03,80,01,60,A5,88,18, C7 
1759 4928 DATA 65,36,85,B9,A5,8B1,65.97, 67 
1761 4938 DATA 85,B1,A9,00,85,A6,A9,00, 94 
1763 4948 DATA 85,A7,A4,B8O,AS,Bl,C4,AA, EO 
1771 4950 DATA ES,AB,10,1C,A5,81,10,2C, 06 
1773 4962 DATA AS,FE,85S,A6,AS,FF,85,A7, 13 
1781 4978 DATA A5S.B0,18,65,AA,85,B8,AS, DB 
1783 4988 DATA B1,65,AB,85,B1,4C,DA,AE, 82 
1791 4990 DATA A9,02,85,A6,A9,00,85,A7, oC 
1799 5008 DATA AS,BO,25,AC,BS,B0,AS,Bl, 38 
17Al+* 5010 DATA E5,AD,85,81.A5,82,18,65, F3 
17A93 59208 DATA SB,85,B2,A5,8B3,65,3C,85, 87 
17Bl 5038 DATA B3.A9,00,85,A8,A9S,00,85, 08 
17B9 5840 DATA AS,A4,B2,AS,B3,CH,AA,ES, C6 
17C1 5050 DATA AB,10,1C,AS,B3,18,2C,A9, 38 
17C9 5060. DATA FE,85,AB,A9,FF,85,A9,A5, FS 
17D1 5078 DATA B2,18,65,AA,85,B2,A5S,83, 1A 
1709 : 5888 DATA 65,AB,85,B3,4C,29,AF,AS, BS 
17E1 50808 DATA 02,85,A8,A9,00,85,A3,A5S, FC 
17E9 . 5108 DATA B2,25,AC,85,B2,R5,B3,25, “HE 
17Fl 5118 DATA AD,85,8B3,A5,36,38,ES,A8, D® 
17F9 - 5120 DATA 85,96,95,97,E5,A9,85.37, 27 
1881 513® DATA AS,SB,18,65,A6,85,9B,A5, D4 
1889 5148 DATA SC,65,47.85.9C,18,A5,A7, DA 
18ll 5158 DATA 10,01,38,66,N7,66,A6,18, BO 
1819 5160 DATA A5,A9,10,01,38,66,A9,66, 29 
1821 _ 5170 DATA AB,AS,B0.38,E5,AB,85,B08, SC 
1823 5188 DATA AS,B1,E5,A9,85,B1,AS,B2, F? 
1831 5190 DATA 18,65,A6,85.B2,A5,83,65, ef 
‚1839 5280 DATA A7,85,B3,4C,EE,AD,88,08, CA 
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1841 
1849 
1851 
1859 
1861 
1869 
1871 
1879 
1861 
1889 
1831 
1893 
ı8RA1 
18A3 
18B1 
18B3 
ı8C1 
18C3 
18D1 
18D3 
18E1 
18E3 
18F1 
18F3 
1991 
1903 
1311 
13193 
1921 


19239 
1931 
1939 
1941 
1943 
1951 
1959 
1961 
13963 
1971 
1979 
1981 
1983 
1931 
1393 
ı9A1 
1949 
ı9B1 


- 19B3 


ı139C1 


13C9 
19D1 
13D3 
19E1 
19E3 
ı9F1 
19F9 
1Ao1l 
1A03 
ıAll 


1Ai9 
ın21 
1r29 
ıA31 
1A393 
ıA4l 
1A43 
ıAnSl 
153 
ıA6l 
1A63 
ıA7l 
1A79 
ı1ABl 
1ABS 
ıAas31 
ı1A33 
1AAl 


5210 
s220 
5238 
Ss24B 
5259 


5260 


"5270 


52828 
5238 
5308 
5310 
53228 
5330 
5340 
5350 
5360 
5378 
5380 
5398 
5408 
5410 
54208 
5430 
5449 
5450 
5459 
5478 
5480 
5430 


5508 
5518 
5520 
5538 


's54Q 


5558 
5568 
5570 
5589 
5538 
5600 
S61l9O 
Ssb2D 
5638 
5640 
5658 
S66D 
5678 
5688 
5630 


5708 
5710 
5720 
5730 
57408 
5750 
5760 
5770 
5780 
5730 


5800 
58108 
5820 
5830 
5840 
5850 
5860 
5870 
5888 
5B30 
59008 
5918 
5329 
5330 
5948 
5358 
5360 
5379 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
Data 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
Data 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


00,00.00,00,00.00,00,00, 808 
AD,74,AF,18,60,77,AF,85, EF 
22,AD,75.AF,6D,78,AF,85, 5B 
23,AD,76,AF,6D,79,AF,85, SC 
35,90,02,E6,36,46,23,66, 78 
22,46,36,66,35,AD,77,AF, FD 
18,6D,7A,AF,85,9B,AD,78, 35 
AF,6D,7B,AF,85,9C,AD,79, 2B 
AF,ED,7C,AF,85,9E,90,02, B4 
E6,9F,46,9C,66,9B,46,9F, 63 
66,9E,A5,22,18,60,77,AF, BE 
85,3D,A5,23,60,78,AF,85, EB 
3E,A5S,35,6D,79,AF,B5,45, 6C 
990,02,E6,46,AD,77,AF,18, F3 
65,98,85,47,AD,78,AF,65, 87 
SC,85,48,AD,79,AF,65,9E, 44 
85,96,30,02,E6,97,06,22, B® 
26,23,06,35,26,36,056,3B, 38 
26,9C,06,9E,26,9F,BE,7D, 8C 
AF,AS,FF,85,FB,A9,BF,85, ®B 
FE,AB,008,AS,9B,31,FB,A5, 17 
FB,D8,802,C6,FC,C6,FB,AS, F3 
SC,S1,FB,AS,FB,D®,02,C6, C8 
BESEBSEB .ASSSESSISFR, AS, -EE 
FB,D0,02.C6,FC,C6,FB,AS, F3 
9F,S1,FB,AS,FB,D8,82,C6, CB 
FE,C6,FB,AS,47,31,FB,AS5S, :97. 
FB,D8,02,C6,FC,C6,FB,AS5S, F3 
48,91,FB,A5,FB,D9,02,C6, 74 
FC,C6,FB,A5,;,96,31,FB,AS, E6 
FB,D80,22,C6,FC,C6,FB,AS, F3 
97,91,FB,A5,FB,D8,02,C6, C3 
FE,C6,FB,AS5,3D,18,65,47, CE 
85,9B,A5,3E,65,48,85,9C, 57 
AS,45,18,65,96,85,3E,A5, 1D 
46,65,97,85,9F,46,3C,66, B2 
9B,46,3F,65,9E,A5,22,A4, 05 
23,38, ES79BS48,985 ES,SC, CE 
18,0F,43,FF,AB,6B,4S,FF, D6 
18,69,01,98,86,C8,4C,B9S, F3 
B®O,A8,68,C0,20,00,2C,CD, 48 
7D,AF,B0,27,A5,35,A4,36, 34 
38,E5,9E,48,98,ES,SF,10, EC 
OF,49,FF,AB,68,49,FF,18, 22 
69,01,90,06,C8,4C,E®,58, SC 
AB,68,C0,20,08,05,CD,7D, 19 
AF,38,47,85,3D0,18,65,9B, B® 
85,47,A5,3E,65,9C0,85,48, AB 
AS,45,18,65,9E,85,96,A5, 1D 
36 ,65,9F,85,97,AS,22,18, F7 
65,3D0,85,3D,A5,23,65,3E, 18 
B5,3E,A5,35,18,65,45,85, 2A 
45,4A5,36,65,46,85,46,46, 33 
48,66,47,46,97,66,956,46, 64 
3E.66. 30,46 ,46,66 ,45, HC, [ae) 
17,B08,45.22,8D,BE,A2,AS, E6 
23,8D,8F,A2,4E,BF,A2,6E, 77 
BE,A2,AS,36,4A,A5S,35,6RA, CB 
8D0,90.A2,AS,SB,80,91,A2, F7? 


AS,SC,80,92,A2,4E,S2,A2, 4B 
6E,91,A2,AS,SF,HA,AS,SE, 36 
6A,80,93,A2,20,94,A2,A5, 58 
FB,C9,FF,D0,07,AS,FC,CS, F6 
BF,D8,01,60,A5,9B,85,22, FD 
n5,9E, 85237. R5739E185,39, CE 
AS,9SF,85,36,A0,00,E6,FB, DF 
Do,02,E6,FC,Bl,FB,85,46, AD 
E6,FB,D0,02,E6,FC,Bl,FB, 58 
85,45,E6,FB,D®,02,E6,FC, E2 
Bl,FB,85,3E,E6,FB,D2,02, B6 
E6,FC,Bl,FB,85,3D,E6,FB,,D3 
D®,02,E6,FC,B1,FB,85,9F, 54 
E6,FB.DO,02,E6,FC,El,FE, 58 
85,3E,E6,FB,D8.02.E6,FC, 89 
B1,FB,85,.9C,E6,FB,D®,02, 58 
E6,EC,B1,6B,05,98B,40,'9B,73C 
B0,20,00.00,20,00,00,00, BO 


www. 


21,02,04,88,10,20,40,88, 
298.70,B2,A5,01,29,FB,85, 
01,49,88,85,9C,85,96,49, 
20,85,9B,A2,07,BD,DE,B1, 
A4,96.31,27,F8,03,A9, 31, 
eC,A3S,30:AC,DB,B1,86,29, 


"A6,S8B,9D,3C,03,E8,88,D®, 


F9,86.5B,A6,29,CA,19,DD, 


AD,DC,B1,85,97,A8,008,#S, 
31,03,3C,23,D9,2A,84,29, 
AD,DB,B1,AC,DS,B1,18,65, 
29,90,01,C8B,AA,S8,48,EC, 
C7,C0,ED,C8,C80,68,B0,15, 
AB,AD,DA,B1,18,65,SC,C9, 
C8,B0,18,28,B6,C0,A4,2S, 
C8,C4,38,D8,CA,E6.SC,C6, 
97,D8,C2,E6,96,A5,96.C9, 
08,D8,8C,AS,01,09,04,8B5, 
801,60,AD,D7,B1,30,11,C$, 
20,98,1C,C3,60,90,04,29, 
DF,D8,02,293,3F ,4C,S7,B2, 
e3,7F,C93,7F,D8,02,AS,SE, 


C3,20,98,03,4C,97,B2,AS, 
20.85,27,A9,00,85,28,AC, 
DD,Bl,06,27,26,28,06,27, 
26,28,06,27,26,28,18,65, 
27,48,98,65,28,A8,68,85, 
27,84,28,60,00,00,00,00, 
ADB,080,B1,04,80,D7,B1,S8, 
48,AD,BA,B2,8D0,D8,B1,AD, 
BB,B2,80,D09,B1,AD,BC,B2, 
8D,DA,B1,20,E6,81,A9,01, 
CD,BD,B2,F80,22,AD,DB,El, 
BOA,OA,OA,18,6D,BA,B2,8D, 
BA,B2,30,03,EE,BB,B2,AD, 
BN,B2,CD,C7,C®O,AD,BB,B2, 
ED,C8,C0,S9,1C,68,68,AD, 
DC,B1,0A,0A,0A,18,6D,EC, 
B2,8D0,BC,B2,90,02,68,60, 
AD,BC,B2,C9,C8,50,02,68, 
60,68,AB,C8,C4H,24,D8,SA, 
60,A0,00,84,FB,AS,E0,85, 
FC/BIIEB,S9/FE7SI7 FBICO, 
D®O,F7,E6,FC,DO,F3,20,00, 
C0,60,48,29,F8,85,FD,568, 
23,07,85,A4,38.29,01,AB, 
BA,4B,29,F8,A2,00,86,FE, 
06,FD,26,FE,06,FD,26,FE, 
06,FD,26,FE,65,FD,S0,02, 
C8,18,65,A4,48,98,65,FE, 
69,E®,A8,68,06,FD,26,FE, 
06,FD,26,FE,65,FD,85,FD, 


98,65,FE,85,FE,68,29,07, 
AA,BD,SC,53,80,3D,83,ED, 
A4,B3,8D.3C,03,A5,FD,85, 
FB,AS,FE,85,FC,60,89,40, 
20,10,08.24,02,01,07,06, 
05,24,03,02,01,00,00,00, 
00,A9S,FF.85,9E,A9,BF,85, 
9F,AE,AE,B3.CA,BA,AE,AC, 
B3,AC,AD,B3,20,48,B3,A5, 
FB,85,35,A5,FC,85,97,AE, 
AE,B3,EB,8A.AE,AC,B3,AC, 
AD,B3,29,49,B3,A5,FB,85, 
9SB,AS,FC,85,3C,AD,AE,B3, 
AE,AC,B3,AC,AD,B3,20,40, 
B3,R8,008,B1,FB,46,02,08, 
02,49,FF,80,41,03,2C,3D, 
83,F0,83,4C,E3,B6,0D,3D, 
03,8D,41.23,8C,40,03,8C, 
3E,23,8C,3F,03,Nn8,00.AE, 
AE,B3,F8.45,B1,96,A6,02, 
D®2.02,49,FF,2C,3D,03,D8, 
36,AE,3E,23,D2,34,AD,AC, 
B3,31,3E,AS,SE,D®,02,C6, 
SF.,C6E,SE,AD,AD,B3,91,SE, 
AS,9E,D8,82,C6,3F,C6,SE, 
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RE,AE,B3,CA,8BA,S1,9E,AS, 
9E,D0,02,C6,3F,C6,SE,R9, 
FF,8D,3E,03,4C,60,B4,BC, 
3E,83,AE,AE,B3,Ed,C7,FO, 
46,81,9B,A6,02,D8,02,43, 
FF,2C,3D,03,D0,36,AE,3F, 
03,D®,34,AD,AC,B3,31,9E, 
AS,SE,D®,02,C6,9F,C6,SE, 
AD,AD,B3,91,SE,AS,SE,D®, 
02,C6,3F,C6,9E,AE,AE,B3, 
E8,8A,31,9E,A5,9E,D®,22, 
C6,9F,C6,IE,AI, FF. BDJ3E, 
03,4C,AD,B4,8C,3F,03,RAE, 
40,83.D8,4D,AD,AC,B3,8D, 
42,03,AD,AD,B3,80,43,03, 
AD,AE,B3,8D,44,03,A5,96, 
80.45,03,A5,97,8D,46,03, 
AS,FB,8D0,47,03,A5,FC,8D, 
48,03,A5S,9B,8D,49,03,A5, 
9SC,8D,4A,03,AD,3C,03,8D, 
4B,23,AD,3D,03,80,4C,03, 
AD,3E,03,80,4D,83,AD,3F, 
03,8D0,4E,03,A93,FF,8D,40, 


03,AE,AC,B3,D8,05,AE,AD, ° 


B3,F0,6B,AE,3C,03,E0,07. 


D8,42,AD,41,03,A6,02,00, 
02,49,FF,91,FB,AS,96,38, 
ES,08,85.96,B0,02,C6,97, 
AS,3SB,38,E9,08,85,3B,B®, 
82,C6,5C,A5,FB,38,E9,08, 
85,FB,B0,02,C6,FC,8C,3C, 
03,A9,01,8D0,3D,83,Bl,FB, 
A6,02,D00,02,49,FF,8D,41, 
03,4C,58,BS,EE,3C,03,0E, 
3D,83,AD,AC,B3,D0,03,CE, 


AD,B3,CE,AC,B3,AD,41,03 
2C,3D0,03,00,09,00,3D,03, 
80,41,03,4C,13,B4,AD,41, 
03,A6,02,D0,02,49,FF,91, 
FB,AD,42,03,8D,AC,B3,AD, 
43,03,8D0,AD,83,AD,44,03, 
8D.AE,B3,AD,45,03,85,96, 
AD,46,03,85,97,AD,47,03, 
85,FB,AD,48,03,85,FC,nD, 
43,03,85,9B,AD,4A,03,85, 
SC,AD,4B,83,8D0,3C,03,AD, 
4C,03,80,3D,03,AD,4D,03, 
8D0,3E,03,AD,4E,03,8D,3F, 
03,B1,FB,A6,02,D9,02,43, 
FF,BD,41,23,4C,6D,B6,AE, 
AE,B3,F®,46,B1,96,A6,02, 
D8,02,49,FF,2C,3D0,03,n0, 
36,AE,3E,03,D0,34,AD,AC, 
B3,91,9E,A5,9E,D®,02,C6, 
SF,C6,SE,AD,AD,B3,91,SE, 
AS,SE,D®,82,C6,9F,C6,9E, 
AE,AE,B3,CA,8A,91,9E,AS, 
9SE,D®,22,C6,9F,C6,9E,n9, 
FF.8D,3E,03,4C,20,B6,8C, 
3E,03,AE,AE,B3,E0,C7,F®, 
46,B1.9B,46,02,D0,02,49, 
FF,2C,3D,03,D8,36,AE,3F, 
03,09.34,AD,AC,B3,91,9E, 
AS,SE,D8,02,C6,9F,C6,9E, 
ADB,AD,B3,91,9E,A5,9E,D®, 
02,C6,9F,C6,3E,AE,AE,B3, 
EB,BA,91,3E,AS,SE,D®,22, 
C6,9F,C6,9E,A9,FF,8D,3F, 
83,4C,6D,B56,8C,3F,03,AE, 
AC,B3,E8,3F,D8,07,AE,AD, 
B3,E0,21,F0,68,AE,3C,83, 
D8,44,AD,41,03,A6,02,D02, 
02,49,FF,31,FB,A5,396,18, 
63,08,85,96,38,02,E6,97, 
AS,SB,18,69,08,85,9B,90, 
02,E6,3C,A5S,FB,18,69,08, 
85,FB,38,02,E6,FC,A9,07, 
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8D,3C,03,R93,80,8D,3D,03, 
B1,FB,A6,02,D0D8,02,43,FF, 
8D,41,803,4C,CA,B6S,CE,S3C, 
03,4E,3D,83,EE,AC,B3,D®, 
83,EE,AD,B3,AD,41,83,2C, 
3D,03,D0,23,0D0,3D,03,8D, 
41,03,4C,D5,BS,AD,41,03, 
'A6,02,00,02,49,FF,S1,FB, 
AB,SE,E®,FF,D0,07,A6G,SF, 
E9O,BF,D®0,01,60,E6,3E,DD®, 
82,E6,3F,B1,9E,8D,AE,B3, 
E6,9E,D®,802,E6,9F,B1,9E, 
8D,AD,B3,E6,3E,D8,02,E6, 
SF,B1,93E,8D,AC,B3,4C,B7, 
B3,01,04,18.40,02,08,20, 
80,03,2C,38,C0,03,22,01, 
208,48,293,F8,85,FD,68,c23, 
07 ,85,A4,BA,0A,48,SB,2A, 
29,01,A8,68,48,29,F8,R2, 
00,86,FE,06,FD,26,FE,26, 
FD,26,FE,806,FD,26,FE,65, 
FD,S0,22,C8,18,65,A4,4B, 
98,65,FE,69,E8,A8,68,06, 
FD,26,FE,06,FD,26,FE,65, 
FD,85,FD,S8,65,FE,85,FE, 
68,29,07,4A,AA,BD,2B,B7, 
8D,3C,83,AA,BD,27,B7,ED, 
42,03,8A,18,65,02,AA,BD, 
1F,B7,80,3D,03,A5S,FD,85, 
FB,AS,FE,85,FC,60,08,00, 
04,08,00,04,08,088,80,01, 
21,01,00,020,00,00,FF,55, 
AA,FF,SS,AA,FF,FF,AS,FF, 
85.9E,A93,BF,85,9F,A6,02, 
BD,SC,B7,85,02,BD,A4,B7, 
8D0,43,03,BD,AC,B7,8D,44, 
83,AE.AE,B3,CA.BA,AE,AC, 
B3,AC,AD,B3,20,2F,B7,#S, 
FB,85,36,A5,FC,85,97,AE, 
AE,B3,EB,8A,AE,AC,B3,AC, 
AD,B3,20,2F,B7,AS,FB,85, 
SB,AS,FC,85,SC,AD,AE,B3, 
AE,AC,B3,AC,AD,B3,20,2F, 
B7,n0,20,B1,FB,AE,43,03, 
D0,03,4D,44,03,8D,41,03, 
2eC,42,23,F0,03,4C,49,BB, 
2D,3D,83,8D0D,41,23,8C,40, 
03,8C,3E,83,8C,3F,03,A0, 
B0,AE,AE,B3,F®,48,B1,S6, 
AE,43,03,D8,03,4D,44,03, 
2C,42,03,D8,36,AE,3E,23, 
D98,34,AD,AC,B3,91,SE,AS, 
9E,DB,02,C6,9F,C6,3E,AD, 
AD,B3,31,9E,A5,9E,D0,02, 
C6,9F,C6,39E,AE,AE,B3,CA. 
BA,S1,3E,AS,3E,D®,02,C6, 
9SF,C6,9E,AS,FF,8D,3E,03, 
4C,7C,B8,8C,3E,03,AE,RAE, 
B3,E0,C7,F0,48,B1,9B,RE. 
43.03,0D0,03,4D.44,03,cC, 
42,03,D00,36,AE,3F,03,D®, 
34,AD,AC,B3,31,9E,AS,SE, 
DB,02,C6,9F,C6,9E,AD,AD, 
B3,91,3E,AS,SE,D8,02,C6, 
9F,CE,3E,AE,AE.B3,EB,BA, 
91,9E,A5S,3E,D9,02,C6.5SF, 
C6,SE.A3,FF,8D,3F,03,4EC, 
CB,B8,8C,3F,23,AE.40,03, 
0D3,53,AD,AC,B3,8D,45,03, 
AD,AD,B3.8D,46,03,AD,#E. 
B3,8D,47,03,A5,96,8D,48, 
03,A5,97,80,49,03,A5S,FB, 
8D0,4AR,03,A5,FC,8D,4B,03, 
AS,3B.8D,4C,03,AS,SC,8D, 
40,03,AD,3C,03,8D,4E,03, 
AD,3D.83,8D,4F,03,AD,3E, 
03,8D0,50,03,AD,3F,03,8D, 
51,203,ARD,42,03,8D,52,03, 
A9,FF,8D,40,83,AE,AC,B3, 
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8318 
83208 
8338 
8340 
8358 
8368 
8378 
8388 
8338 
8408 
B41o 
8420 
8430 
8440 
8450 
B4HED 
8470 
8480 
8490 
8508 
8518 
8528 
8530 
8540 
BSS0 
8569 
8570 
B588 
8590 
8608 
8610 
B620 
8630 
BE4DO 
8650 
8660 
5670 
8680 
8630 
8700 
8710 
87208 
8730 
8748 
8750 
8760 
8770 
8780 
87908 
8800 
8810 
8820 
8830 
8840 
BBSO 


8860 
8870 
8880 
8839 
8300 
8310 
8329 
8530 
8340 
8352 
8368 
8378 
8380 
8358 


92828 
solo 
sa28 
93939 
3248 
9852 
9268 
9979 
9288 


D9,08,AE,AD,B3,00,23,4C, 
B2,B9,AE,3C,03,E8,03,00, 
4E.AD,41,03,AE,43,03,08, 
23,4D,44,03,31,FB,A5,96, 
38,E93,08,85,396,B0,02,C6, 
37,45,9B,38,E9,08,85,38B, 
BQ,02,C6,3C,45,FB,38,E3, 
08,85,FB,B8,02,C6,FC,6C, 
3C,03,16.02,BD,ı1F,B7,8D, , 
3D,03.09,03,80,42,03,E1, 
FB.NE,43.03,00,03,4D,44, 
03,80,41,03,4C,34,B9,EE, 
3C,03,0E.30,03,0E,30,03, 
BE,42,03.0E,42,03,AD,AC, 
B3,D0,03,CE,AD,B3,CE.nC, 
B3,AD,41,03,2C,42,03,D0, 
03,00.30,03,80,41,03,4C, 
2D,B8,AD,41,03,AE,43,03, 
D8,03.4D,44,03,91,FB,AD, 
45,03,8D,AC,B3,AD,46,03, 
8D,AD,B3,AD,47,03,8D.AE, 
B3,AD,48,03,85,396,AD,49, 
03,85,97,AD,4A,03,85,FB, 
AD,4B,03,85, FC,AD,4C,03, 
85,9B,AD,4D,03,85,3C,AD, 
4E,03,80,3C,03,AD,4F,03, 
8D0,30,03,AD,50,03,8D.3E, 
03,AD,51,03,80,3F,03,AD, 
52,03,80,42,03.Bl,FB,AE, 
43,03,D8,03.4D,44,03,8D, 
41,03,4C,B7,BA,AE,nE,B3, 
FO,48,B1,96,AE,43,03,D®, 
03,4D,44,03,2C,42,03,D®, 
36,AE,3E,03,D0,34,AD,AC, 
83,31,9E,A5,9E,D0,02,C6, 
9F,C6,39E,AD,AD,B3,31,3E, 
AS.SE,D®,02,C6,3F,C6,9E, 
AE,AE,B3,CA.8N,31,39E,N5. 
9E,D9,02,C6,3F,C6,3E,49, 
FF,8D,3E,03,4C,68,BA,8C, 
3E,03,AE,AE,B3,E0,C7,F®, 
48,B1,3B,AE,43,03,D0,03, 
4D,44,03,2C,42,03.D0.36, 
AE,3F.03,D0,34,AD,AC,B3. 
91,9E,AS,9E,D0.02,C6,9F, 
C6,3E,AD,AD,B3,91,9E,NS, 
9E,D0,02,C6,9F,C6,3E,RE, 
AE,B3,E8,8n,31,3E,n5.3E, 
D0,02.C6.39F,C5,9E,A9,FF, 
8D,3F,03.4C,B7,BA,8C,3F, 
03,AE,AC,B3,E®,9F,D0.0on, 
AE,ND,B3.E0,00.00,03.4C. 
49, BB,AE,3C,03,D0,54.nD, 
41.03, AE,43,03,D0,03,4D, 
44,03,91,FB,A5.96.18,69, 
08,85,96,90,02,E6,37,#5, 
9B,18,63,08,65,3E,30,02, 
E6S,3C,AS,FB.18,69,08,85, 
PB,90,02,E6,FC.AS,03.ED, 
3C,03,45,02,18.69,03,An, 
BD,1F,B7,80,30,03,A9,C®, 
BD,42,03,Bl,FB,NE,43,03, 
D®,03,4D,44,03,8D,41,03, 
4C,30,5B,CE,3C,03,4E,3D, 
03,4E,3D,03,4E,42,03,4E, 
42,03,EE,AC,B3,D0,03,EE, 
AD,B3,AD,41,03.2C,42,03, 
D2,23,00,30,03.8D,41,03, 
4C,1B,BA,AD,41,03.AE,43, 
03,09.03,4D,44.03,31,FB, 
AG,9SE,EO,FF.DO.97.AE,3F, 
E®,BF,D9,01,60,E5.3E.D8, 
22,E6,3F,B1,3E,8D.RE,B3, 
ES,3E,D0,902,E6,3F,B1,3E, 
8D,AD,E3,E6,9E,00,02,66, 
9SF,B1,39E,8D,AC,B3,4C,CF, 
B7,R9,24,8D,Fa,FF,Ag,Ccı, 
B8D,FB,FF,A3,FA,8D,00,93, 


5259 
9188 
91108 
9120 
3130 
9148 
9158 
9169 
9170 
9188 
9198 
92008 
9210 
9228 
9230 
9248 
9250 
9260 
9270 
9280 
9239 
93988 
93310 
9320 
9338 
93428 
9359 
9369 
93370 
9380 
9338 
9400 
S41® 
94208 
3430 
9440 
9450 
9460 
9470 
9480 
9420 
3500 
9518 
9520 
3538 
95408 
9550 
9560 
9570 
9580 
3599 
3602 
3612 
3622 
9638 
3549 
3550 
E-1=1=1%) 
93570 
9628 
3533 
9798 
3718 
9728 
3738 
3740 
9758 
9768 
93770 
9788 
9798 
9808 
9818 
3820 
93830 
9848 
3558 
9869 
9878 
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A9S,C1,8D,01,03,A9.CA,8D, 
08,03,49,C2,80,09.83,AD, 
21,D8,8D,DD,A8,68,41,52, 
43,00,42,53,59,4G,49,4E, 
45,00,43,48,41,52,00,43, 
49 90,43, 4E, 49500, 434 F, 
4C,00,44,4F,54,00,46,49, 
4C,4C,00,48,47,52,08,49, 
4E,56,08,4C,493,4E,45,09, 
s8,41,52,00,44,49,53.4B, 
00,52,45,43,54.09.53,58, 
4CE,49,4E,45,00,.54,45,58, 
5s4,00,45,52.41,53,45,00, 
44,49,52,080,53,514,41,54, 
55,53.00,93.00,34.00,48B, 
45,4C,590,20,00.86,C4,63, 
C5,7E,C7,81,C2,11,C2,1D, 
C2,BF,C2,3E,C1,B6,C2,44, 
C2,F1,C5,655C3,27,C7,FB, 
C4,ES,C7,805,C2,02,C3,E6, 
Ge ,ZETCAFRSE CARL, CH -HCH 
63,A1,3C5BE,C1,4C,C2,C1, 
4C,E0,C1,4C,AF,B3,80,02, 
40,01,00,20,73,00,C9,26, 
F0,06,20,79,08,4C,E7,97, 
A2,FF,AB,00,8C.23,C1,EB, 
C8,BD,25,C0,F0.19,D1,7A, 
FO,F5S,E8,BED,25.C0,D0,FA, 
EE,23,C1,A0,00,BD,26,C0, 
D®O,ES,A2,08,4C,37,A4,88, 
18,98,65,7A,85.7A,30,02, 
E6,7B,AD,23,C1,0A,AA.BD, 
8C,C0,BC.8D,C0.8D,1E.Cı, 
8C,1F,C1,28,73.00,20,00, 
09,4C,AE,A7,00,78,A5,01, 
093,22,85,01,.4C,47, FE, 78, 
AS,01,29,FD.85,01,60,45, 
01,09,02,85,01,58,60,20, 
SE.B7,E0,00,00.09,20,2E. 
C1,28,DE,AB,4C,36,C1,E®, 
01,00,09,20,2E,C1,20,00, 
AB,4C,36,C1,E0,02,00,09, 
EB,2E,C1,20,75,R2,4C,36, 
E1,E0,03,08,093,20,2E,Cl, 
20,20,A8,4C,36,C1,E9,04, 
0D0,09,28,2E,C1,20.87,#0, 
4C,36,C1,4C,00,C2.20,2E, 
E1,28,DE;ADSHE,36,C1.20, 
9E,B7,EN, dn,0n,2A,0A,BD, 
AA,C1,20,FD,AE,20,9E,B7?, 
BA,23,0F,18,60,AA,C1,6D, 
1D,Al1,60,920,28,8E,C1,85, 
96,20,FD,AE,20,9E,B?,B&, 
93B,20.FD,AE,20,SE,B7,BE, 
37,Al,69,A5,14,C9,40,4A5, 
15,ES,01,8B8,34,E0,C8,Bß, 
30,69,n5,14,C9,A0,B0,23, 
AS5S,15,08,25,E0,C8,58,21, 
690,E0,CB,B8,1C,AA,SB,.E2, 
48,E3.01,B98,14,60,E0,CB, 
BO,OF,C9,AB,B8,0B,C0,00, 
D2.07,60,28,85,C1,4C,BB, 
E3,A2,0E,4C,37,A4,20,B9, 
C0,20,2E,C1,20,05,A1,4C, 
36,C1,20,89,C0,20,2E,Cl, 
28,1A,Al,4C,36,C1,20,EB, 
B7,20,BC,C8,8A,48,A5,14, 
48,A5,15,48,28,FD,AE,20, 
9E,B7,BA,29,97,85.02;290; 
2E,C1,68,A8,68,AA,68,20, 
B6,C0.4C,36,C1,20,EB,B7, 
280,BC,C8,8E,S8,A2,A5,1%, 
8D.BE,A2,RAS,15,8D,8F,r2, 
28,.FD,AE,20,EB,B7,20,B£E, 
C9,BE,S3,A2,AS,14,8D.531, 
A2,A5S,15,80,92,A2,.20,FD, 
AE,28,9E,B7,8A,29,07,85, 
02,208,2E,C1;28,94,A2,3C, 
35,01,28,EB,B7,28,BC,C®, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
BATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 


AS,14,8D,D2,A4,AS,1S,8D, 
D3,A4,8E,D4,A4.A9,00,8D, 
DS,A4,20,FD,AE,20,3E,B7, 
BE,DE,A4,20,FD,AE,20,9£, 
B7,84,29,07,85,02,20,2£, 
C1,20,55,A5,4C,36,C1,20, 
2E,C1,20,27,B3,4C,36,C1, 
20,EB,B7,20,BC,C®,AS,14, 
8D,AC,B3,A5,15,80,AD,B3, 
BE,AE,B3,20,FD,AE,20,3E. 
B7,84.29.07,85,02,20.2E, 
E1,20.C2,C0,4C,36,C1,a9, 
08,85,BA,20,B4,FF,A9,6F, 
85,89,20,96,FF,20,AS,FF, 
20,D2,FF,C9,00,D0,F6,20, 
AB,FF,E0,A9,64,85,BB,A9, 
C3,85,BC,A9,01,85.B7,#8, 
08,85, BA,n9,60.85,59,20. 
DS,F3,AS,BA,20,B4,FF,AS, 
89.20.96, FF,A4,90,D®,3n, 
AB.06.84,FB,20,AS,FF,ABß, 
FC,85,FC,A4,.30,D0,2B,A4, 
FB,88,D0,EE,A4,FC,20.CD, 
BD,20,3F,AB,20,AS,FF,A6, 
30,00,17,An,FO,06,20,De, 
FF,4C,43,C3,A9,02D,20.D2, 
FF,20,E1,FF,F0.04,n0,04, 
D9,C8,4C,42,F6,24,A9, OF, 
20,C3,FF,A9,00,20,BD,FF, 
A9,OF,AB,A2,08,20,BA,FF, 
20,57,E2,20.C0,FF,60,20, ! 
SE.AD,20,R6,B6,48,n9,15, 
85,88,A9,08,85,BA,n9,00, 
85.B9.68,A6.22,A4,23,20, 
BD,FF,A9.00,AA,AO,EO,20, 
D5,FF,20,00,C0,n9,37.85, 
01,60,20,9E,AD,20,n6,B6, 
48\A9,08,A2,15,n0.01,68, 
AB,22,AH,23,20,BD,FF,n9, 
80,85,AE,A9,FF,85,AF,n9, 
00,85.C1.19,E0,85,Ce,n9, 
61,85,89,N4,8B7,D0,03,4C, 
10.F7,20,05,F3,20,8F,F6, 
AS,EA,20,0C,ED,.AS.B9.20, 
B3,ED,AO,00,20.8E,FB.nS, 
AC.20,0D,ED,AS,AD,20,0D, 
ED.28,D1,FC,B®,12,20.2E. 
C1,Bl.AC,HB.20.36,C1,68. 
20,0D.ED,20,DB,FC,D2,E9, 
4C,3F,F6,N9,19,Ad,C4H.4C, 
1E,AB,41,52,43.20,42,53, 
50 ,4C,49,4E,45.20,43,48, 
41,52,20,43,43,52.,43.4C, 
45,20,.43,4F,4C,20,44,49, 
52,20,44,49,53,4B,0D,44, 
4F,54,20,45,52,41,53.45. 
29,46,49,4C,4C,20,48,45, 
4C,50,20,48,47,52,20,49, 
4E,56,20,4C,49,4E,45,20, 
4C,4F,41,44,0D,50,41,52, 
20,52,45,43,54,20,53,41, 
56,45,20,53,58,4C.43,4E, 
45,20,53,54,41,54,55,53. 
29,54,45,58,54,00,00.20. 
EB,B7,20,BC,C®,AS,14,8D. 
3D,A9,A5,15,8D,3E,A9,8E, 
3F,A9,20,FD,AE,20,EB,B7, 
20,BC,CO,AS,14,8D.41,A9, 
AS,15,80,42,A9,8E,43,A9, 
28,FD,AE,29,EB,B7,20,5C. 
C9,AS,14,BD,45,A9,AS,15, 
8D,46,A9,BE,47,A9,n9,00, 
8D,40,49,8D,44,A9,80,48, 
A9,29,FD,AE,20,3E,87,8£, 
61,R9,20,FD,AE,20,3E,B7, 
8A,29.07,85,02,20.2E.C1, 
22.62,09,4C,36,C1,20.,386, 
E1,4C.00.C2,20,36,C1,n2, 
14,4C,37,A4,20,EB,B7,28, 


Sonderheft 2 up 45 


2951 190670 DATA SEC,CO,AS,14,8D,74,AF,AS, AF 2561 11330 DATA AD,1D,C7,8D,93,A2,29.34, 47 


2953 19689 DATA 15,80,75,AF,BE,76,AF,20,. FS 2B53 11340 DATA A2,4C,36,C1,00.09,09,00, CC 
2961 10698 DATA FD,AE,20,EB,B7,28,BC,C9, 17 2B71 1135® DATA 00,00,00,00,00.00.00,00, 00 
2363 18708 DATA AS,14,80,77,AF,AS,15,8D, 39 2B73 11360 DATA 20,EB.B7,20,BC,C0,AS,ı14, 59 
2971 10710 DATA 78,AF,8E,79,AF,20,FD.AE. EB 2881 11378 DAIA A4,15,80,1B,C7,8C,1C,C7, 30 
2979 10720 DATA 298,EB.B7,29,BC,C9,A5,14, 59 2BB3 11388 DATA 80,24,C7,8C.25,07,6E,1D, 73 
2381 10730 DATA 8D,7A,AF,AS.15,8D,7B,AF, 71 2ESI 11330 DATA C7,BE,20,07,22,FD,AE.20, 44 
29383 10740 DATA BE,7C,AF,AS,00,85,35,85, 45 2833 11400 DATA EB,B7,20,BC,C0.8A.18,6D. 7A 
2331 10750 DATA 46,85,97,85.9F,20,FD,AE, AO 2BAl 11418 DATA 1D,C7,80,03,4C,20,C2,8D, 64 
2399. 10760 DATA 20,9E,B7,E8,E8,BE,7D,AF, 79 2BAS 11420 DATA 26,C07,80,23,C7,AA,AS,14, 77 
2SAl 10779 DATA 20,FD,AE,20,9E,8B7,84A,29, FS EBB1i 11430 DATA A4,15,18,60,15,C7,48.38, 3F 
29A9 10788 DATA 07,85,02,20,2E,C1,20,7E, 75 2BBS 11448 DATA 6D,1C,C7,A8,68,8D0,1E,C7, A2 
PSB1 10799 DATA AF,4C,35,C1,20,EB,B7,20, #S 2BC1 11458 DATA BC,1F,C7,80,21,C7,BC,22, 6B 
29B9 10800 DATA BC,CO,AS,14,8D.1B.C7,A5, 20 2BC9 11450 DATA C7.28,BF,CO,4C,6E,C6,20, 29 
2SC1 190810 DATA 15,80,1C,C7,86,35,20.FD. 52 2BD1 11470 DATA EB,B7,€0,BC,C0.A5,14,8D, 3B 
29C9 10820 DATA AE,20.EB,B7,20,BC,C0,AS, “4l 28203 11489 DATN D8,B1.N5,15,80,D09,B1,8E, 8D 
2901. 10830 DATA 14,85,30,45.15,85,3E,86. 71 EBEI1 11430 DATIN DA,B1,20,FD,AE.20,3E,87, Ci 
2909 19848 DATA 45,20,FD,AE,20,EB,87,29, 49 25E9 11592 DATA BE.D7.E1,29.FD,NE,20,9E, 19 
29El 10850 DATA BC,C0,AS,14,85,47,45,15, 5A eSF1 11518 DATA B7,E0,01,60.03.40,00,C2, IF 
29E3 10860 DATA 85,48,86,396,20,FD,AE,28. DF 2BF9 11529 DATA EB,19,99,03,4C,08,C2,8E, D2 
29FI1 10870 DATA EB.,B7,20,BC,C0,A45,14.85, 43 2C01 11530 DATA DB,B1,20.FD,AE,28.39E,E?, C2 
29F9 10889 DATA 3B,A5,15.85,9C,86,3E,48, 31 20293 11548 DATA E®O,01,B0,03,4C,02,C2,EO, BB 
ERB1 10890 DATA 00,85,36,85,46,85,37,85. 08 eC11 11550 DATA 1A,90,03,4C,00,C2,BE.DC, 32 
eNBI'10300 DATA SF,20,FD.AE.20,9E,B7.EB, 1E 2C19 11560 DATA Bl,20,FD,AE,20,3£,B7,BE, BA 
PAll 10910 DATA EB,BE,7Nn,AF,20.FD,AE,20, DA ec21 11570 DATA DD,B1,20,FD,AE,20.3E,B7, CH 
PA1I 10920 DATA 9E,87,84,29,07,85,02,20, AD ec23 11588 DATA BA,29,07,85,02,208,2E,Cl, 33 
PA2DI 10930 DATA 2E,C1.AD,1B,C7,85,22.AD, E56 2C31 11590 DATA 20,E6,Bl1,4C,36.C1,209,EB, 4A 
PA2I 10948 DATA 1C,C7,85,23,06,3D,26,3E, 68 2C33 11600 DATA B7,20,BC,C0,AS,14,8D,BA, F6 
PA31 10350 DATA 06,45,26,46,06,47,26,48, 3F eC41 11619 DATA B2,A5S,15,8D0,EB,B2,BE,EC, 70 


ERA33.10968 DATA 86,96,26,97,28,FC,AF,4C, 88 
eA41 10970 DATA 36,C1,28,EB,B7,20,BC.,C®, 3E 
ER49 10988 DATA BE,1D.C7,8E,90,A2,A5.14. 28 
eASI 10999 DATA At.15.80,18,C7,8C,1C,C7. 808 
EAS9 119080 DATA BD,BE.R2,BC,8F.A2,20,FD, 25 


11620 DATA B2.20,FD,RE,29.3E,AD,24, EB 
11630 DATA 0D.30,03.4C.09,C2,20,16, "ME 
11640 DATA BE.85.24,A5S,22,85.94,A5. AD 
11659 DATA 23,85,05,20,FD.AE,20,SE. 55 
11660 DATA B7,EO,01,80,03,4C,00,C2. IF 


PAGI 11010 DATA AE,20,EB,B7,20,8C,C0.8E,. 58 2eC71 11670 DATA EO,13,90,03.4C,990,C2,8E, DE 
eNG3' 11028 DATA 29,C7,8E,93.A2.AS,14,A4, C2 2C73 11680 DATA DB.B1,20,FD.RE,20,9E.B7, C2 
BA7I 11030 DATA 15,80, 1E.C7,8C.1F,C7.80, 86 eC81 11659 DATA ED,01,60,03,'1C.00,C2,Ed, BB 
ER79 110408 DATA 91,A2,8C0,92.R2.20,FD.RE, B3 2C89 11708 DATA 1A,30,03,4HC,08.C2,8E,DC. 32 
PAB1 11050 DATA 20,EB,E7,20.8C.C0.8E,23, 33 eC91 11710 DATA Bl,20.FD.AE.20.9E,B7,8E, BA 
EABS 11060 DATA C7,8A,38,ED.20,C7,18,6D, BE 2C939 11720 DATA DD,Bl,20,FD,AE,208,9E,E?7, CH 
PAII 110708 DATA 10,C7,8D,.26.C7.AA.AS,14, 6B eCRl 11730 DATA 8N,29.01,80,8D,8B2,20,FD, 03 
EA39 110808 DATA A4,15,8D0,21,C7.8C,22,C7, S® ech3 11740 DATA AE,20,9E,B7,8A,29,07,85, 58 
eAnI 11090 DATA 38,ED,1E,C7.48.98.ED,IF. 21 eCB1 11758 DATA 02,20,2E,C1,20,BE,B2,4C, 18 
eANR9 11100 DATA C7,AB,68,18,60.1B,C7,48, 3F 2CB3 11760 DATA 36,C1,09,00,08,00,00,00, 76 
eARBL 11110 DATA 98,60,1C,C7,nB,68,8D.24. 29 

ENB3 11120 DATA C7,8C,25,C7,20.BF,C0.20, SB 60009 FOR A-2043 ID 11448 STEP 41S2 
PACI 11130 DATA FD,AE,20,9E,87.8n,23,07, 20 8:5=8:C=®:FOR B=® TO 7: 

PACS 11140 DATA 85,02,20,2E,C1.nD,1B,C7, DD GOSUB 69040 

EADI 11150 DATA BD,8E,A2,AD,1C,C7:B8D.BF, 48 50818 S=-S+H+L-C:C-5>255:5=-255-5 5034 
ERDI 11168 DATA A2,AD,1D.C7,80.390,A2.AD. 3E AND 255:POKE A+B,H+L:NEXT 

PAEI 111708 DATA 1E,C7,80,91.A2.AD,ıF.C7, Al B:GOSUB 60040 

PAES 11180 DATA 8D,92,A2,AD,29.C7.80.33. 44 60029 FS="PRUEFSUMME OK”":IF S> 5699 
PAF1 11190 DATA A2,20.94.A2,AD.1E,C7.8D, 3C H+L IHEN F$="CRUS] 

SAFS 11200 DATA BE,A2,AD,1F,C7.80,8F,R2, AB PRUEFSUMMENFEHLER”:F=F+1 - 

2BO1 11210 DATA AD,20,C7,80.30.A2,AD.21, 40 62039 GDSUB 68980:NEXT A:PRINT " 2267 
2B03 11228 DATA C7.80,91,A2.,RD.22.C7.80, ED EDOWNI"F"FEHLER":END 

2B11 11230 DATA 92,R2,AD,23,C7.80.53.R2, A4 60040 READ H$:60SUB 60850: H=L* 2715 
'2B19 11240 DATA 28,94,R2,AD.21.C7,8D,8E, DB 16:H35=NID$ CHS,2) 

eB21 11250 DATA A2,AD,22,C7,8D,8F,A2,AD, 44 E09SB L-ASC CHS+"X”)-4B: IF L<® 3138 
®B23 11268 DATA 23,C7,80,39,R2,AD,24.C7, AC OR L>22 THEN 60980 

2B31 11270 DAIA 8D,91,A2,AD,25,C7,8D0,32, 4B 60068 IF L<1® THEN RETURN 1944 
2839 11288 DATA A2,AD,26,C07,8D0,33,A2,28, DI 602970 L=L-7:IF L>3 THEN RETURN 1334 
PB41 112930 DATA 94,A2D,AD,24.C7,8D0,8E,A2, AO 60080 FS="LRUSIEINGABEFEHLER”:L= 2460 
2B49 11300 DATA AD,25,C7,8D0.6F,A2,AD.26, 35 O:F=F+1 

2B51l 113108 DATA C7,8D,90,A2,nD.1B.C7,8D, F3 69030 PRINT "ZEILE" PEEK (64) * 27256 
2BS9 11329 DATA S1,A2,AD,1C,C7.8D,32,A2, #9 ESG+PEEK (63)F8$: RETURN 


Listing 1: Kombinierter Hexdump-Basiclader von GRAÄFIX 


19208 rem demoprogramm &text103,185,”Space druecken”,1,1, 
1210 poke 53289,8:poke 53281.0 216,0,1 

1080 : 

1898 goto 2008:rem hauptprogramm gosub 14908: if £$="” " then 1158 


1108 : get a$:ıf a$<>” ” then 1148 
1118 rem unterprogramme return 
1120 : 


6 KIUD Sonderheft 2 
WEW MEMESONPUTERWORLD- ESM 


2008 
2018 
2029 
2040 
28590 
2060 
2070 
2088 
2039 


2108 
2118 
2128 
2130 
2148 
2158 


2160 


2178 


2188 
2190 
2208 
2210 
2220 
2238 
2EHO 
2258 
2268 
2270 
2280 


2290 


2308 
2310 


2320 
2330 
2340 


2350 
2360 
2370 


2380 
2399 
2400 
2419 
2428 


2438 
24408 
2458 
2460 


WWW.HOMEZONPUTERWORLD EOM 


z=159*rnd (1) 
return 


2=200*rnd (1) 
return 


rem farbwechsel 


get f$:if f$="" then 1420 

F=-asc (f$):if f<133 or £>136 then 
1500 

if £=-133 then pf=pf+1 and 15 

if £f=-134 then pf-pf-1+16 and 15 
if £=-135 then hf=hf+1 and 15 

if £f=1356 then hf=h£-1+16 and 15 
&colpf,hf:goto 1428 


return 


rem hauptprogramm 


rem initialisierung 
&hgri 
gerase7,® 


ren titelbild 
&bspline®,939,0,9,319,80,3193,39,24,1 
&bspline®,1090,08,199,313,199,319,198, 
a 


&text62,60, "Grafik”,4,5,216,0,1 
&text34,110, "Demo”,4,5,216,0.1 


&bsplineS,99,5,5,314,5,314,39,24,1 
&bspline5,100,5,194,314,194,314,100, 
24,1 
&bsplinel®,39,10,10,3093,10,309,59, 
24,1 
&bsplinel®,100,10,1893,309,189,303, 
100,24,1 


gosub 11408 


rem menue 
&erase6,®d 
&rect®,8,319,199,1 


&text75,15, "Auswahl”,3,4,216,0,.1 
&rect5,5,309,49,1 


&text6S,75, "FilSspaceslLinien",1.2, 
e16,0,1 
&recte5,70,269,24,1 


&text65,105, "F3CSspaces)Kreise und 
Boegen",1,2,216,0,1 
&rect25,100,269,24,1 


&text65,135,"FSC5spaces]Splines",1, 
8,216,0,1 
&rect25,130,269,24,1 


&text65,155, "F7LSspaceslWeiter” 1,2, 
e16,0,1 ; 
&rect25,160,269,24,1 


rem auswahl 

get a$:if a$="" then 2419 

if asc (a$)<133 or asc (a$)>136 then 
2410 


if asc (a$)-133 then gosub 3808 
if asc (a$)=134 then gosub 4998 
if asc (a$)=135 then gosub 5008 


if asc (a$)=136 then goto 7080 
goto 2288 


rem lines 


pf-3:hf-08:&erasepf,hf 
for x=1 to 358 step 2 


a-508*sin (x/10)+1608 
b=-60*sin (x/28)+B0 
c*-78*sin (x/30)+1608 
d=-5808*sin (x/40)+80 
&linea,b,c,d,1i1 

next 

gosub 1138 


pf=4:hf=d:8erasepf,hf 
for x=1 to 319 step 4 
a=x 

b=-68*sin (x/68)+100 
c*-408*sin (x/25)+160 
d=-28*sin (x/308)+100 
&linea,b,c,d,1 

next 

gosub 11308 


return 
rem circles 


pf-S:hf-®:Serasspf ,h£ 

for x=2 to 118 step 2 

&circlel .8B*x+10,50*sin (x/38-,2)+x+ 
18,x/2+x/8,1 

next 

gosub 1138 


rem arcs 


pf=-13:hf-8:&erasepf,hF 
x2=153:y1=189:4y3-108 

for i=-1580 to 8 step -7 

y2e=® 

x1=J 

%x3=319-i 

if i>68 then :&arcx1,ul,x2,42,x3,y3, 
1,!:goto 4388 
garcxl,yl,x2,42,X3,4u3,0,1 
ye=-1399:x1=-x3:x3=i 

if i>68 then :&arcx1,41.x2,42,x3,.43, 
1,1:goto 4338 
&arcxl,yl,x2,4u2,x3,43,2,1 

next 


gosub 1138 


return 

rem splines 

&hgr2 

f=-1:8erase2,5,6,8 
8&text0,179,"zufasellige Splines”,1,1,' 
216,8,1 

&text®,180,”Taste druecken”,1,1,216, 
0,1 


gosub 1170:x1=z 

gosub 1208:y1=z 

gosub 1170: x2=z 

gosub 1208:y2=z 

gosub 1170:x3-z 

gosub 12088: 4y3=z 

i=rirl:if i=-25 then id: f=-F+l:if E=4 
then f=1 
&splinexl,yl,x2,42,x3,43,4,£ 
xi=-x2:yl=y2 

x2=x3:y2=y3 

gosub 1178:x3=z 

gos.b 1208:y3=z 

get w$:if w$="" then 5129 
&hgri 


5208 
6090 


return 
rem besonderes 


6018 : 


6015 
6920 
6030 
6040 
6950 
6060 
6970 
6080 
6030 
: 6108 
6110 
6120 
6130 
6140 
6142 


6144 


6150 
61609 
6170 
6175 
6188 
6199 
6208 
6210 


6220 
6230 
6248 
6420 
64328 
6440 
6452 


6460 
6470 


6439 
6434 
6496 
6508 
6510 


. 6528 
6530 
6548 


6545 
6558 
6560 
6570 
65828 
6598 
6593 
6600 


6619 


6629 
6629 
6630 


66408 
6659 
6668 
6678 
6688 
6698 


6700 
6718 
6720 
6738 
6748 
6808 


adas 


pf-10:hf=-B®:&erasepf ‚hf 
rem sinus, cosinus 


&line®,99,319,39,1 
&line159,0.159,199,1 


&line319,99,314,94,1 
&line319,99.314.104,1 


&line159,0,154,5,1 
&line159,0,164,5,1 


&text259,101,”X-Achse”,1,1,216,0,1 
&text161,6,"Y-Achse”,1,1,216,1,1 
&text19,10,"*L2spaces]Sinus"”,1.1, 
216,0,1 


&text10Q,20, "+C2spaces)Kosinus”,1,1, 
216,0,1 

help=-300/C2*C[pi]}) 

for x=-[pi] to [pi] step. .1 


xp=x*he+155:yp=-sin (x)*97+37 
&charxp,yp,asc (”"*"),1,1,216,1 
yup“-cos (x)*937+37 
&charxp,yup,asc C"+"),1,1,216,1 
next 


gosub. 1130 
rem zeichensatzdemo 


pf-15:hf-8:&erasepf,hf 

&text12,18, "Verschiedene 
Zeichensaetze :”,1,1,216,2,1 
&text1,68, "Commodore gross/klein”, 
1714e16,077 


&text1®,11®, "commodore grafix AS 
2 X Ccbm +J [Ccbm *) £”,1,1,208,0,1 

gosub 1138 

&erasepf,hf 


&text50,18, "in verschiedenen 
Groessen :",1,1,216,0,1 
&line50,20,50+27*8,20,1 


&text15,87,"Cömmodore 64”,3,3,216,0, 
1 
gosub 1138 


for i-®d to 10 
8rect®+i,87+i,319-2*i,21-2®i,D® 
next 


For i=1 to 20®:next 

&text103,185, "Space druecken",1,1, 
216,0,0 

&text598,10,"in verschiedenen 
Groessen :",1,1,216,0,8 


‘ 


For i=-1 to 2088:next 


&text59,10®,"naturlich auch senkrecht 


dee IS NT U Sa Da! 
&line50,20,59+27*8,20,0 


&text5Q,18,"L26pil”,1,1,216,0,1 


Stext20,50, "Written" ,4,2,216,1,1 
&text116,30,”by",5.2,216,0,1 
&text259,50, "Ruppert" ,4,2,216,1,1 
gosub 1130 

Serasepf ‚hf 


Rerasepf,hf 
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142 


2331 


1740 
1918 


1840 
1835 


1673 
1683 


3416 
3344 
2823 


3063 


1416 
1614 
32808 
2341 
1922 
2405 

130 


531 


e411 
4853 


4633 


4883 


531 


748 
4997 


2316 
3618 
531 
738 
3497 
130 


857 
37893 


4983 


857 
4791 


2252 
8838 


2831 
2578 


29308 
531 


748 
748 


MECONMPUTERWORLD, COM 


6818 


6309 
6333 
7008 


7010 
7020 


70398 
7040 


7059 
7068 


7100 
7ı18 
71208 


7130 
7140 
7150 
7160 
7178 
7180 
7208 


7218 


72208 


7238 
7240 
7258 


7269 
82098 


8070 
8980 
8030 
8100 
8118 
81208 
8130 
8149 
8158 
8160 
8178 
8188 
81398 
8200 
8218 


8220 
3002 
3918 
9028 
99308 
gp4D® 


9052 
9062 
9078 
9088 
9232 
9198 
9118 
91208 


3138 
9140 
5158 
9169 
3178 
9188 
9132 
9289 


&text0,d,”georg ruppert”,3,25,208,0. 
1 


gosub 1138 

return 

&text65, 75, ”[7spaces]JLinien”,1,2, 

216,08,9 
&text65,105,”[7spaces]Kreise und 
Boegen”,1,2,216,0,08 

&text65,135, "[7spaces]Splines”,1,2, 
216,0,8 


&text65,75,”"[7spacesJFuellen”,1,2, 

216,0,1 

&text65,105, "[7spaces]Springball”,1, 

2,216,0;,1 

&text65,135, ”[7spaces]Gefuellte 
Boegen”,1,2,216,08,1 

rem auswahl 

get a$:if a$="" then 7110 

if asc (a$)<133 or asc (a$)>136 then 
7118 


(a$)=-133 then 
Ca$)=134 then 
if asc (a$)=135 then 
if asc (a$)-136 then 
goto 2208 
&fext6S,75,”[7spaces]IGefuellte 
Kreise”,1,2,216,0,8 

&text65,105, "[7spaces]JLinien”,1,£, 
216,0,8 

&text65,135, "[7spaces]Texte”,1,e, 
216,0,8 


&text65, 75, ”"[7spacesJLinien”,1,£, 
216,0,1 
&text65,105,”C7spaces]Kreise und 
Boegen”,1,2,216,28,1 

&text65, 135, ”[7spacesJSplines”,1,2, 
216,20,1 

goto 2498 - 

rem Fuellen 


if asc 
if asc 


gosub 8200 
gosub 9982 
gosub 10008 
goto 11208 


&hgr2 

&erase9,10,6,8 
&textB,89, "commodore”,2,5,216,08,2 
&Fill33,100,3 
&Fill80,100,3 
&Fill95,105,3 
&Fill113,100,3 
8efill143,95,3 
&Fill®,0,1 
&rect?2,798,155,60,6 
&rect3,71,153,58,6 
poke 198,8:wait 188,1 
&hgri 

return 

rem springball 

&hgr2 

Serased,0,0,0 
&circle79,49,50,2 


&circle34,139,50,2 
&circlel24,139,50,& 
8sFil179, 34,1 
8Fil1134,139,2 
erilll24,139,3 
&circle79,49,50,5 
&circle34,139,50,5 
&circlel24,139,50,5 


£f1-9:f2=6: 3-0 
h=fl:f1=-f2:f2=f3:f3=h 
&colf1,Ff2,F3,® 

For i=1 to 188:next 

get wS:if wS="" then 91590 


&ehgri 


3139 


531 
ee 
3511 


4627 


3118 


3204 
3643 


4405 


1480 
2353 


1469 
1487 
1403 
1411 

563 
4063 


3455 
3255 


3543 
4623 
3246 

ER 


332 
127B 
2361 
1322 
1035 
sEah=i= 
1535 
1231 

692 
1588 
152% 
1588 

376 
142 


392 
s42 
1778 


1792 
1835 
1307 
1157 
1556 
1781 
1798 
1847 


1488 
e417 
19831 

B2S 
1B62 


3763 


g21l® return 142 | 12888 rem gefuellte kreise 
9228 : 12210 &hgr2 332 
18022 rem multiarc 12028 &erase2,5,3.9 1087 
10020 &hare 332 | 12030 &circle79,99,75,1 1926 
1900838 Berase2,5,6,08 1099 
12031 &par153,99,739,30,0,39,1 2547 
10040 &arc8Q,139,30,169,0,69,1,1 2183 
E 12932 &par79,0,45,99,79,199,1 Pays 
10058 &Fill79,169,1 1340 
12835 &circle73,99,30,1 1733 
10060 &arcB0,179,30,149,0,49,1,2 2158 
: 12036 &spline®,199,79,0,159,199,4,1 3398 
10078 &Fil179,159,4 1386 
di 12837 &spline®,8,73,199.1593.0,4.1 2394 
10080 &Fi1l179,159,2 1354 
a ‚| 12040 erı1110,99,3 1081 
12% ee ‚1,3 Bent 12050 &fill149,99,3 ° 1259 
ı s 7 [7] ; 2 rn R 3 
lass 1366 | 12060 a ae Ed 5514 
2:8Fill159,199,2 
10129 &arc80,139,30,109,0,9,1,2 2159 
10130 &Fil179,119,6 14190 | 12070 &fi1l179,39,3 1339 
10140 8fi1l179,119,2 1346 12888 &fill79,36,3:8fi1l179,163,3 3316 
ee 12098 &Fil179,60,2 1310 
® Fil=2: -5:f3= 1635 
10160 Btext2o, 60, "Taste" ,1,2,216,1,2 2792 | 1510 x Sen = 3 
T - 1211® h=f2: F2=F3: :£3=h 1958 
10165 &text135,40, "druecken”.1,2.218,1,2 3549 | 12120 &colfi.F2 E30 1931 
10170 get w$:if wS="" then 10170 1871 a en 
inradt“ 12130 get w$:if w$="" then 12110 1774 
10190 &hgri 376 2er 20 ahgel Se 
12158 return 142 
10208 return 142 13888 rem linien? 
110008 &text65,75,”"C7spacesJFuellen”, 1,2, 3148 13010 : 
ehe 13020 &erases,O 627 
ion ee Rees pr Daball 71, EB | 1593 Atartia. 70 "Die Folgenden Linien 4706 
11020 &text6S,135,"L7 Gef werden mit ",1,1,216,0,1 
ae 1 a ra ee 404 | 13940 &text10,80,"Line-Befenl gezeichnet 4973 
Se ur AH und mit”,1,1,216,9,1 
11021 &text6S,75, "[7spacesiGefuellte #137 | 13058 &text10,30,"Fill geloescht..” ‚2,1 3308 
Kreise”,1,2,216,0,1 i 216,0.1 ’ 
11022 &t 5 ‚®L7 inien”,1,2, 29 
ge En arg spacesalinien?; 14@ = 13060 atextio, 100, "Bitte beachten sie die S2B1 
RAR. x & ekursion !" ‚1,1,216,0,1 
11023 Srarunordas; [7spaces]Texte”,1,2, 3287 13070 gosub 1130 sg 
11030 rem auswahl 13088 : 
11040 get a$:if a$="" then 11049 1425 | 13030 &line®,0,319,198,1 1489 
11050 if asc (a$)<133 or asc (a$)>136 then 2733| 13108 &line®,1,319,199,1 1745 
11040 13110 &line159,0,159,199,1 1318 
13128 &line160,0,160,199,1 1833 
11860 : 13130 &line®,199,319,0,1 “1329 
11078 if asc (a$)-133 then gosub 12900 1469 13148 &line1,199,319,1,1 1489 
11088 if asc (a$)=134 then gosub 13900 1503 | 13158 &Fil11S7,97,0 1257 
11098 if asc (a$)=135 then gosub 6090 1441 | 13168 get w$:if w$="" then 139099 1768 
11100 if asc (a$)=136 then goto 7200 1491 | 13170 : 
111108 goto 22028 563 | 131808 return 142 


Listing 2: Demoprogramm zu GRAFIX 


PB rem *+erunnnunnnnnenenne &bspline150, 90,140, 122,148. 125,155,185,1.1 4231 

3 rem * schriftdemo ® 61 

4 rem * erzeugt bild 4 ® 62 rem buchstabe n 

S rem *ronnnnnonnunnannen 63 &bsplinel55,125,160,125,178, 120, 175,108,1,1 36498 

6; 64 &bsplinel75,100,180.38,190,95,190,105,1.1 4018 

10 ähgri 376 66 &line190,105,198,125,1 eı1us 

28 Berasel5,® 852 68 Ebsplinel98,105,130,90,210,90,210,105,1.1 3914 

BS : 78 &bspline210,105,210,120,215,125,225,120,1,1. 3604 

86 rem buchstabe s 71; 

30 &bspline29,40,12,55,22,70,40,70,1,1 3637 Toren ertstebe u 

32 &bspline40,70,59,70,70,43,62,4@,1,1 3597 73 &bspline22S,120,242,115,260,90,250,30,1,1 3557 

34 &bsplineß2,40,59,34,48,50,48,70,1,1 3801 74 &bspline250,30,248,90,238,115,238,122.1.1 4289 

36 &line48,70,48,110,1 1307 

37 &bspline48,110,48,130,23,135,19,120,1,1 3897 75 : 

zen: ee Maas ee. 245, 130,285, 113,280, sa,1,1 3924 
spline 

15 ae 1334 78 &bspline289,99,275,95,275,105, 288, 112, 1, 1 4214 

42 81ine75,100,75,165,1 2105 80 Auer pezs0. 110,290,120,278,130,265,120,1,1 3568 

44 &bspline75,105,82,95,92,108,33,112,1,1 4975 85 

45 &bspline93,112,94,127,103;124,110,112,1,1 4172 66 rem rahmen 

46 : S® &bspline4Q,10,25,10,10,25,10,40,1,1 3467 

47 rem buchstabe 1 92 &1ine18,490,10,130,1 1655 

48 &linell0,112,138,55,1 1388 S4 &bsplinel0,139,10,150,30,178,590,170,1,1 4927 

S® &bsplinel38,55,145,47,149,38,135,37,1,1 Y4ES5 35 &1ineS50,178,260,170,1 1507 

52 &bsplinel35,37,128,37,118,79,118,108,1,1 4481 38 &bspline269,170,280,178,308,150,3088,1308,1,1 3966 

54 &bsplinell8,109,118,122,120,125,127,125,1,1 3782 188 &line300,138,308,40,1 1826 

SG : 102 &bspline398,:48,390,25,285,10,2798,10,1,1 4953 

57 rem buchstabe i 104 &1ine278,180,40,10,1 1723 

58 &bspline1l27,125,135,125,142,115,150,58.1,1 3733 118 : 

59 &circlelS5,70,5,1 1581 1028 poke 1398,0:wait 198,1:&hgr® 2253 


Listing 3: Spline-Demo erzeugt Bild 4 
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20 Sound-Befehle — aber kein 
Pieps kommt aus dem Lautspre- 
cher! Was soll das für ein Unsinn 
sein? Ganz einfach: Bei MUSIK- 
BASIC handelt es sich um einen 
kombinierten Compiler-Interpre- 
ter. Der Compiler übersetzt die 
Musikbefehle in Soundtabellen. 
Zu hören ist dabei nichts. Der In- 
terpreter arbeitet diese Tabellen 
ab, Erst jetzt erklingt die Komposi- 
tion. Das Besondere daran: Musik- 
stücke lassen sich problemlos in 
andere Programme einbauen — 
auch nachträglich. Denn MUSIK- 
BASIC läuft .interruptgesteuert 
und stört nicht den Ablauf des je- 
weiligen Hauptprogramms. 


Compiler erzeugt 
Musiktabellen 


Aufbau und Arbeitsweise von MU- 
SIK-BASIC: Re 
l. Die Basic-Erweiterung MUSIK- 
BASIC (Bereich: $8000—$8B9F) 
Alle neuen Befehle werden als 2- 
Byte-Token platzsparend gespei- 
chert und können wie im Stan- 
dard-Basic abgekürzt werden. Für 
alle Parameter der neuen Befehle 
können Variablen oder beliebig 
komplizierte Ausdrücke verwen- 
det werden. 
Beispiel: TABLE A,B,C # 2/5 
Im Gegensatz zu anderen Basic- 
Erweiterungen werden die Musik- 
Befehle nicht sofort ausgeführt, 
sondern ein spezieller Code in 
Musiktabellen abgelegt. Mit dem 
Befehl IRQON werden diese Ta- 
bellen automatisch abgearbeitet. 
2. Die Musiktabellen (Bereich: 
wird vom Benutzer definiert): 
In den Musiktabellen sind alle In- 
formationen gespeichert, die zum 
‘ Spielen des komponierten Liedes 
nötig sind. Der Aufbau der Tabel- 
len erfolgt automatisch über die 
MUSIK-BASIC-Befehle. Für jede 
Stimme muß eine Tabelle ange- 
legt werden. Jede Stimme kann je- 


Der Soundtrack zum ei- 


genen Programm muß 


kein Wunschtraum 
bleiben. Musik-Basic 


erzeugt dreistimmige 


Begleitlieder per 


Interrupt. 


doch mit einem Tabellencode so- 
fort wieder abgeschaltet werden. 
Die Tabellenlänge ist abhängig 
von der Fülle der Information. In- 
nerhalb der Tabellen können be- 
liebig Sprungadressen eingebaut 
werden, somit ist die Konstruktion 
von „Endlosliedern“ möglich. 

3. Der Musikinterpreter MUSIK- 


ı INT (Bereich: $C000—-C1BD): 


Mit diesem kurzen Programm 
wird das komponierte und in Ta- 
bellen codierte Lied automatisch 
abgespielt. Das geschieht unab- 
hängig von der Basic-Erweiterung 
und gerade laufenden Basic- oder 
Maschinenprogrammen. Die Mu- 
siktabellen werden schrittweise 
abgearbeitet, bis diese Routine 
wieder abgeschaltet wird. 


SID-Funktionen 
En 


Zum Verständnis der neuen Be- 
fehle sind verschiedene Begriffe 
und Funktionen des Sound-Chips 
zu erklären. Der Synthesizer SID 
verfügt über drei Stimmen. Jede 
Stimme ist gekennzeichnet durch 
die Wellenform und Hüllkurve. Es 
gibt die Schwingungsformen Drei- 
eck, Rechteck, Sägezahn und Rau- 
schen. 

Mit der Hüllkurve wird der Ton- 
verlauf festgelegt. Sie wird durch 
vier Parameter bestimmt: 

Attack: Zeit, in der die Lautstärke 
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Musik nonstop 


von null auf den Höchstwert an- 
steigt (Amsec—8sec). 

Decay: Zeit, in der die Lautstärke 
von max auf den Sustainpegel ab- 
fällt (ömsec—24sec). 

Sustain: Lautstärke während der 
Haltephase (0—15). 

Release: Zeit, in der die Lautstär- 
ke nach dem Halten vom Sustain- 
pegel auf null abfällt (6msec-' 
—24sec). 

Das Volumen gibt die maximale 
Lautstärke an (0—19). 

Die Stimmen können über einen 
Hochpaß-, Bandpaß- und Tiefpaß- 
filter geschickt werden. Eine Kom- 
bination dieser Filter ist möglich. 


Ringmodulation 
Pe ee 


Alle Stimmen können synchroni- 
siert und ringmoduliert werden. 
Mit einer einstellbaren Filterreso- 
nanz können bestimmte Frequen- 
zen hervorgehoben werden. 

Die Filterfrequenz kann ebenfalls 
eingestellt werden. 

Die neuen Befehle! 

1. Programmierhilfen 

AUTO Startzeile, Schrittweite 
AUTO ‘ 

Beispiel: AUTO 100,10 

Die Zeilennummern werden auto- 
matisch vorgegeben. Ohne Para- 
meterangabe werden die letzten 
Werte übernommen (mit 100 und 
10 voreingestellt). 

RENUM Anfangswert, Schrittwei- 
te 

Beispiel: RENUM 100,10 

Ein Basicprogramm wird neu 
durchnumeriert. Alle Sprungbe- 
fehle werden mitgeändert. Für 
Zeilennummern, die auf eine nicht 
existierende Zeile zeigen, wird 
der Wert 65535 eingesetzt, 
ACTIVE 

Durch RUN/STOP + RESTORE 
werden Zeiger in der Zero-Page 
des Computers verstellt. Diese 
werden mit ACTIVE korrigiert. 
KEY 

KEY 1-8, "Text" 


KEY 1-8, "Text«-" 


Beispiel: KEYl, "RUN«-“ 


Die 8 Funktionstasten sind im Di- 
rektmodus mit einem Text belegt. 
KEY ohne Parameter zeigt die Be- 
legung an. Mit KEY 1-8, “Text" 
wird die entsprechende Funk- 
tionstaste neu belegt. Ein ange- 
hängtes '-' bewirkt, daß der Be- 
fehl nach Drücken der Taste so- 
fort ausgeführt wird. Der Text darf 
maximal 10 Zeichen lang sein. 

2. MUSIK-BASIC-Befehle: 

Diese Befehlsgruppe legt keinen 
Code in den Mustiktabellen ab. 
TABLE Stimme, Tabellenstart, Ta- 
bellenende 

Parameter: Stimme 1—3 
Tabellenstart 0—65535 _ 
Tabellenende 0-65535 

Einer Stimme wird im Arbeitsspei- 
cher ein bestimmter Bereich zuge- 


‚teilt. In dieser Tabelle werden die 


programmierten Musik-Codes ab- 
gelegt. Die Tabellen sollten in ei- 
nem von Basic geschützten Be- 
reich abgelegt werden. 

Geeignet sind: 828 — 1019 

35744 — 40959 (nur, wenn MUSIK- 
BASIC V1.0 im Speicher) 

49598 — 53247 

TABLE x muß als erstes definiert 
werden, bevor für Stimme x Ta- 
bellencode programmiert wird! 
Bei Nichtbeachtung erfolgt eine 
Fehlermeldung. Wird eine Tabel- 
le kleiner als 5 Bytes definiert, er- 
folgt ebenfalls eine Fehlermel- 
dung. Es ist erlaubt, mehrere Stim- 
men mit der gleichen Tabelle ar- 
beiten zu lassen. 

VOICE Stimme 

Parameter: Stimme 1—3 

Beispiel: 20 VOICE 1 

Es wird definiert, für welche 
Stimme (Tabelle) die nachfolgen- 
den Musik-Code-Befehle gelten. 


' Voice muß definiert werden, be- 


vor für eine Stimme Musik-Code 
erzeugt wird. 

CLEAR _ 
Löscht alle Tabellen und deren 
Definitionen. CLEAR wird automa- 
tisch bei jedem RUN ausgeführt. 
IROON 

Der Musikinterpreter zur Abar- 
beitung der Musiktabellen wird 
eingeschaltet. 

Achtung: Sind für eine Stimme kei- 
ne Tabellen mit einem sinnvollen 
Ende (SWITCH, RESTART, POIN- 


TER) vorhanden, kann dies zum 
Absturz des Systems führen! 
IROOFF 

Der Musikinterpreter MUSIK-INT 
wird ausgeschaltet und die Laut- 
stärke auf Null gestellt. 

TSAVE Stimme, "Name", Geräte- 
adresse 

Parameter: Stimme 1-3 

“Name“ maximal 16 Zeichen 
Geräteadresse 8=Floppy/1=Kas- 
sette 

Die Tabelle für die angegebene 
Stimme wird bis zum aktuellen 
Stand abgespeichert. Diese Ta- 
belle kann von einem anderen 
Programm geladen (LOAD"Na- 
me",8,1) und zur Musikerzeugung 
mit dem Interpreter MUSIK-INT 
verwendet werden. Eine genaue 
Beschreibung dieses Vorgangs 
folgt. 

Es sollte keine Tabelle gespei- 
chert werden, in der noch kein 
Musik-Code abgelegt wurde. 

3. Befehle zum Erstellen einer 
Musiktabelle: 


Diese Befehlsgruppe legt in den 


Musiktabellen einen Code ab. 

SOUND Frequenz, Pausel, 

Pause2 

Parameter: Frequenz 0—65535 
Pausel 0-255 
Pause2 0-—255 

Mit Sound wird ein zu spielender 

Ton in der Musiktabelle abgelegt. 

Frequenz bestimmt die Tonhöhe, 

Pausel die Halte-Zeit (siehe vor- 

ne) und Pause2 die Zeit zwischen 


der Release-Zeit und dem Anr-. 


schlag des nächsten Tones (Pause 
zwischen zwei Tönen). Beide Pau- 
sen-Werte liegen zwischen 0 (bei 
0) und 4,3 (bei 255) Sekunden. 
Achtung: Das Lo-Byte der Fre- 
quenz darf aus Gründen der inter- 
nen Code-Verarbeitung nicht 0 
sein, sonst erfolgt eine Fehlermel- 
dung. - 

PULS Frequenz 

Parameter: Frequenz 0—4095 

Die Pulsbreite für eine Stimme 
wird definiert. Dies ist nur bei ei- 
ner Rechteckschwingung sinnvoll. 
WAVE Wellenform, Sync, Ring ' 
Parameter: Wellenform: 
l=Dreieck 

2=Sägezahn 

3=Rechteck 

4=Rauschen 

Sync 0O=nein/l=ja 
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Ring: 0O=nein/l=ja 
Die Wellenform für eine Stimme 
wird definiert. Sync bewirkt eine 
Synchronisierung der Stimme, 
Ring eine Ringmodulation. 
ENVELOPE Attack, Decay 
Parameter: Attack 0-15 

Decay 0-15 
Der Anschlag des Tones wird de- 
finiert. Erklärung von Attack und 
Decay siehe vorne. 
HOLD Sustain, Release 
Parameter: Sustain 0-15 

Release 0-15 
Erklärung von Sustain und Relea- 
se siehe vorne. 
VOLUME Lautstärke, Tiefpaß, 
Bandpaß, Hochpaß 
Parameter: Lautstärke 0—15 
Tiefpaß® 0O=aus, 1l=ein 
Bandpaß O=aus, l=ein 
Hochpaß O=aus, l=ein 
Die maximale Lautstärke eines To- 
nes wird festgelegt, weiterhin kön- 
nen Filter ein- oder ausgeschaltet 
werden. Die maximale Lautstärke 
ist für alle drei Stimmen gültig. 
FILTER Frequenz 
Parameter: Frequenz 0—2048 
Die Eckfrequenz (bei Tief-, Hoch- 
paß), beziehungsweise Mittelfre- 
aquenz (Bandpaß) der Filter wird 
bestimmt. 
RESONANZ Frequenz, stl, st2, st3 
Parameter: Frequenz 0—15 
stl 0—1 (O=nicht über Filter, 1= 
Stimmel über Filter) 
st2? 0—1 (O=nicht über Filter, 1= 
Stimme2 über Filter) 
st3? 0—]1 (O=nicht über Filter, 1= 
Stimme3 über Filter) 
Die Resonanzfrequenz der Filter 
wird definiert. Der Parameter st], 
st2 und st3 gibt an, ob die jeweili- 
ge Stimme über die Filter geleitet 
werden soll. 


‘PAUSE X 


Parameter: X 0—255 

Bis zum Anschlag des nächsten 
Tones wird die Zeit x (Yo s) abge- 
wartet, 

SWITCH 

In der Musiktabelle der aktuellen 
Stimme wird ein Code abgelegt, 
der die Stimme abschaltet. Ein 
weiterer Musik-Code-Befehl nach 
SWITCH für die gleiche Stimme 
führt zu einer Fehlermeldung. 
POINTER X 

Parameter: x 0-65535 


"In der Musiktabelle wird ein Code$ | 
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abgelegt, der den Tabellenpoin- 
ter beim Abarbeiten des Liedes 
auf die Adresse X richtet. Eine be- 
stimmte Adresse kann man sich 
während des Komponierens mit 
Hilfe der Funktion POINT) mer- 
ken (siehe unten). 


RESTART 

In der Musiktabelle wird ein Code 
abgelegt, der den Tabellenpoin- 
ter beim Abarbeiten des Liedes 
wieder auf den Tabellenanfang 
richtet. Ein weiterer Musik-Code- 
Befehl nach RESTART für die glei- 
che Stimme führt zu einer Fehler- 
meldung. 

4, Funktionen in MUSIK-BASIC 
TABSTART (X) 

Liefert den Tabellenstart der Stim- 
meX, 

Beispiel: 100 A=TABSTART(]) 
TABEND (X) 

Liefert das Tabellenende für die 
Stimme X. 


POINT (X) 

Liefert den aktuellen Tabellenzei- 
ger der Stimme X. In diese Adres- 
se wird der nächste Musik-Code 
abgelegt. 

Durch den Befehl POINTER X und 
die Funktion POINT(X) lassen sich 
Tonschleifen programmieren. Bei- 
spiel: 

100 A=POINT() 


200 POINTER A 

Der Tabellenteil, der durch die 
Befehle zwischen Zeile 100 und 
Zeile 200 erzeugt wird, wird in ei- 
ner Endlosschleife gespielt. 

INFO (X) 

Liefert eine Aussage, ob die Stim- 
me X noch aktiv ist. Eine Stimme 
ist nicht mehr aktiv, wenn der Be- 
fehl RESTART oder SWITCH an- 
gewendet wurde. 

Beispiel: ’ 

10 A=INFO() 

20 PRINT A 

A=0:noch aktiv 

A = \:nicht mehr aktiv 

CURRENT 

Liefert die aktuelle Stimme. 
Beispiel: 

10 A=CURRENT 

20 PRINTA 

5, Fehlermeldungen in MUSIK- 
BASIC: 

TABLE UNDEFINED 

Es wurde eine Stimme angewählt, 


für die noch keine Musiktabelle 
definiert wurde. 

TABLE OVERFLOW 

In der aktuellen Musiktabelle sind 
weniger als fünf Byte frei 

VOICE NOT ACTIVE 

Es wurde Musik-Code für eine 
Stimme programmiert, die nicht 
aktiv ist. 

LO-BYTE=ZERO 

Beim SOUND-Befehl ist das Lo- 
Byte der Frequenz null (nicht er- 
laubt). 

BAD OSCILLATION 

Illegale Wellenform beim WAVE- 
Befehl. 

BAD ATTACK 

Illegaler Attack-Wert beim EN- 
VELOPE-Befehl. 

BAD DECAY 

Ilegaler Decay-Wert beim EN- 
VELOPE-Befehl. 

BAD SUSTAIN 

Ilegaler SUSTAIN-Wert . beim 
HOLD-Befehl. 

BADRELEASE llegaler RELEASE- 
Wert beim HOLD-Befehl 

BAD VOLUME 

Illegaler Lautstärke-Wert beim 
VOLUME-Befehl. 

BAD FREQUENCY 

Illegaler Frequenz-Wert. 

NO VOICE DEFINED 

Es wurde Musik-Code program- 
miert, ohne daß eine Stimme defi- 
niert wurde. 

BAD VOICE 

Illegaler Stimmen-Wert. 

TABLE REDEFINED 

Es wurde versucht, eine zweite 
Tabelle für die gleiche Stimme zu 
definieren. 

ILLEGAL TABLE VALUE 

Beim TABLE-Befehl ist das Tabel- 
lenende kleiner als der Tabellen- 
start. 

0=NO/1=YES ® 

Bei einem Parameter, der ’0' für 
'nein’ oder 'l’ für 'ja’ verlangt, 
wurde ein Wert größer als | ange- 
geben. 

TSAVE WITHOUT TABLE 

Es sollte eine Tabelle gespeichert 
werden, die noch nicht definiert 
wurde. 


Befehlsübersicht: 

TABLE VOICES 
SOUND PULS 
WAVE ENVELOPE 
HOLD RESTART 
POINTER PAUSE 
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SWITCH IROON 
IROOFF VOLUME 
FILTER RESONANZ 
CLEAR TSAVE 
POINT INFO 
TABSTART TABEND 
CURRENT AUTO 
RENUM KEY 
ACTIVE 


Programmieren einer 
Musiktabelle 


Beim Aufbau einer Musiktabelle 
sollte eine bestimmte logische Rei- 
henfolge eingehalten werden. 
Am Anfang müssen die Wellen- 
form (WAVE), die Attack- und De- 
cayzeit (ENVELOPE), der Sustain- 
pegel und die Releasezeit (HOLD) 
sowie die Gesamtlautstärke (VO- 
LUME) definiert werden. Wird als 
Wellenform die Rechteckschwin- 
gung gewählt, muß noch das Tast- 
verhältnis mit PULS angegeben 
werden. 
Jetzt kann eine beliebige Anzahl 
von Noten folgen (SOUND). Die 
Anzahl der Noten wird nur von 
der Länge der definierten Tabelle 
begrenzt. Pro -‚Note werden vier 
Byte benötigt. 
Zum Anschluß der Musiktabelle 
muß unbedingt einer der folgen- 
den Befehle stehen: 
SWITCH (Stimme abschalten) 
RESTART (Weiter beim Tabellen- 
start) 
POINTER X (Weiter bei 
Adresse X) 
Bei Nichtbeachtung läuft die IRQ- 
Routine in einen undefinierten Be- 
reich. Dies kann einen Absturz 
des Betriebssystems zur Folge ha- 
ben. 
Listing 4 und 5 sind zwei Demopro- 
gramme, die zeigen, wie man mit 
MUSIK-BASIC programmiert. 
Beispiel zum Einbinden von Musik 
in andere "Programme hier 
"SPIEL*): 
Für alle drei Stimmen müssen mit 
MUSIK-BASIC Musiktabellen er- 
stellt und abgespeichert werden. 
Beispiel: TSAVEI,'tab1",8 
TSAVE2, "tab2",8 
TSAVES3, "tab3",8 
Man beachte, daß für alle Stim- 
men eine Tabelle erzeugt werden 


der 


‚muß, auch wenn man nur eine 
oder zwei Stimmen benutzen 
möchte. Soll eine Stimme nicht be- 
nutzt werden, könnte deren Tabel- 
le so aussehen: 

10 TABLE 3,52000,52006 :REM Ta- 
belle definieren 

20 VOICE 3 :REM Stimme '3 .an- 
wählen 

30 SWITCH :REM Stimme 3 ab- 
schalten 
40 TSAVES,"tabl",8 :REM Tabel- 
le abspeichern 
In dem Programm "SPIEL" müs- 
sen diese Tabellen, sowie MUSIK- 
INT geladen werden. MUSIK-BA- 
SIC wird nicht benötigt. 

Beispiel: 

100 IF A=0 THEN A=1:LOAD 

“MUSIK-INT" ‚8,1 
110 IF A=1 THEN A=2:LOAD 
“tabl",8,1 
120 IF A=2 THEN A=3:LOAD 
"tab2" 8,1 
130 IF A=3 THEN A=4:LOAD 
“tab3",8,1 
Dem Interpreter müssen nun noch 
die Adressen mitgeliefert wer- 


10 IF A THEN 20 
15 A=1:LOAD "MUSIK-BASIC",8,1 
20 IF A=2 THEN 30 


den, wo die Musiktabellen liegen. 
140 S(1)=50000 :REM Start Tabel- 
lel 

150 S(2)=51000 :REM Start Tabel- 
le2 : 

160 S(3)=51500 :REM Start Tabel- 
le 3 


170 FOR I=0 TO 2: X=S(+]): 
REM Tabellenstarts poken 
180 HI=INT(X/256):REM Hi-Byte 
berechnen 

190 LO=X-256*HI:REM Lo-Byte 
berechnen . 

200 POKE49190+1*2,LO:REM 
Lo-Byte poken 

210 POKE49191 +1*2,HI:REM 
Hi-Byte poken 

220 NEXTI 


Einschalten der Musik: SYS 49152 
Ausschalten der Musik: SYS 49183 
MUSIK-BASIC und MUSIK-INT 
sind als kombinierte Hexdump-Ba- 
siclader abgedruckt (Listing 2 und 
3). Wie man mit-dieser Ärt von 
Listing umgeht, steht auf Seite 6. 
Werden die Programme als Basic- 
Lader eingegeben, so können die 


25 A=2:LOAD "MUSIK-INT",8,1 


30 SYS 64738 


Listing 1: MUSIK-BOOTER startet MUSIK-BASIC und MUSIK-INT 


9F,82,5E,FE,C3,C2,CD,38, 
30,64,90,0A,03,09,CE,20, 
20,2A,20,2A,20,2A,20,20, 
40,20,55,20,53,20,49,20, 
48,20,2D,20,42,290,41,20, 
53,20,49,20,43,20,20,2A, 
20,2A,20,2A,0D,0D, 20,20, 
20,20,20,20,20,28,43,29, 
20,31,39,38,36,20,42,59, 
20,48,2E,41,42,45,4E,44, 
53,43,48,45,49,4E,0D,®D, 
09,40,49,53,54,09,90,99, 
09,00,00,09,52,45,CE,31, 
30,30,2C0C,31,30,0D,990,52, 
55,4E,0D,00,00,00,00,902, 
00,00,52,55,4E,00,09,®®, 
00,00,00,090,090,47,4F,54, 
4F,00,99,09,09,090,909,90, 
47,4F,53,55,42,00,00,00, 
00,09,09,41,55,54,4F,®®, 
09,00,00,00,00,00,4B,45, 
59,0D,09,00,00,00,090,02, 
00,0D,4B,45,59,07,01,03, 
05,8D,89,A7,8A,9B,20,73, 
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fertigen Maschinenprogramme 
nach dem Einpoken der Daten mit 
1. MUSIK-BASIC: 

POKE 43, 0:POKE 44,128 

POKE 45,160:POKE 46,139 

SAVE “MUSIK-BASIC",8 

2. MUSIK-INT: 

POKE 43, 0:POKE 44,192 

POKE 45,190:POKE 48,193 

SAVE "MUSIK-INT" 8 

auf Diskette abgespeichert wer- 
den. 


Programmstart durch 
MUSIK-BOOTER 


Achtung: Bevor der Lader von 
MUSIK-BASIC gestartet wird, muß 
mit 

POKE 56,127:CLR 

das Basic-Speicherende herabge- 
setzt werden. 

Werden die Programme als Hex- 
dump eingegeben, muß der 
Checker benutzt werden. Als 
Startadresse ist 8000 (MUSIK-BA- 
SIC) beziehungsweise C000 (MU- 
SIK-INT) anzugeben. 

Geladen und gestartet wird MU- 
SIK-BASIC mit “MUSIK-BOOTER“ 
(Listing 1). Dieses Programm lädt 
nach dem Start mit RUN beide Ma- 
schinenprogramme und initiali- 
siert sie, 


(Horst Abendschein icumiukmumuut 


09,C9,8A,D0,06,20,59,86, 
4C,D3,890,C9,CC,99,04,C9, 
CD,99,06,29,79,00,4C,E7, 
A7,8D,0E,80,20, 1E,82,20, 
73,09,38,E9,CC,0A,A8,Bl, 
FD,8D,F6,80,C8,B1,FD,8D, 
F7,80,20,73,00,20,9F,85, 
4C,AE,A7,10,0F,24,0F,39, 
0B,C9,FF,F®,07,C9,CC,B®, 
06,4C,24,A7,4C,F3,A6,8D, 
0E,80,20, 1E,82,C8,B1,5F, 
38,E9,CB,AA,84,49,AQ®,FF, 
CA,F0,07,C8,B1,FB,10,FB, 
30,F6,C8,Bi1,FB,39,05,2®, 
47,AB,D®,F6,4C,EF,A6,A6, 
7A,AO,04,84,0F,BD,®0,02, 
10,07,C9,FF,F0,3E,E8,D®, 
F4,C9,20,F0,37,85,28,C9, 
22,F0,55,24,0F,70,2D,C9, 
3F,D0,04,A9,99,D9,25,C9, 
39,90,04,C9,3C,90,1D,84, 
71,A0,00,84,0B,88,836,7A, 
CA,C8,E8,BD,00,02,38,F9, 
SE,AO,F®,F5,C9,80,D®,2F, 
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8188 509 DATA 
81938 519 DATA 
8198 520 DATA 
81AO 530 DATA 
81AB 540 DATA 
81B®O 550 DATA 
81B8 560 DATA 
8iIc®O 570 DATA 
81Cc8 580 DATA 
81D® 590 DATA 
8sıD8 600 DATA 
81EO 619 DATA 
SIES 620 DATA 
8SIFO 632 DATA 
81IF8 640 DATA 
8200 6598 DATA 
8208 660 DATA 
8210 670 DATA 
8218 680 DATA 
8220 690 DATA 
8228 700 DATA 
8230 710 DATA 
8238 720 DATA 
8240 730 DATA 
8248 740 DATA 
8250 750 DATA 
8258 ' 760 DATA 
8260 770 DATA 
8268 780 DATA 


8270 798 DATA 
8278 800 DATA 
8289 810 DATA 
8288 820 DATA 
8299 830 DATA 
8298 840 DATA 
82A0 850 DATA 
82A8 860 DATA 
8259 870 DATA 
82B8 880 DATA 
82C0 890 DATA 
8208 908 DATA 
82D® 918 DATA 
82D8 920 DATA 
82E® 930 DATA 
82E8 948 DATA 
82F0 950 DATA 
82F8 960 DATA 
8390 978 DATA 
8308 980 DATA 
8310 998 DATA 
8318 1900 DATA 
8320 1910 DATA 
8328 1020 DATA 
83390 19030 DATA 
8338 1048 DATA 
8340 1050 DATA 
8348 1069 DATA 
8350 1078 DATA 
8358 19080 DATA 
83690 1098 DATA 
8368 1108 DATA 
8378 1118 DATA 
8378 1120 DATA 
8380 1130 DATA 
8388 11408 DATA 
83990 1150 DATA 
8398 1160 DATA 
83AQ 1170 DATA 
83A8 1180 DATA 
83B® 1190 DATA 
83B8 -12808 DATA 
83C® 1210 DATA 
83C8 1220 DATA 
8300 1230 DATA 


05,0B,A4,71,E8,C8,99,FB, 
01,C9,90,F®,38,38,E9,3A, 
FQ0,04,C9,49,D0,02,85,0®F, 
38,E9,55,D®,A0,85,08,BD, 
00,02, F0,E0,C5,08,F®,DC, 
C8,99,FB,01,E8,D®,F®,A6, 
7A,E6,0B,C8,B9,9D,A®, 10, 
FA,B9,9E,A0,D0,B5,F®,®F, 
BD,00,02,10,BD,99,FD,®1, 
C6,7B,A9,FF,85,7A,60,A9, 
CB,8D,®E,80,EE,OE,80,AD, 
0E,80,C9,CE,90,02,B0,EO, 
20, 1E,82,A9,CC,85,9B,A®, 
®0,B1,FB,D®,02,C8,E8,BD, 
00,02,38,F1,FB,F®,F6,C9, 
80,D0,11,05,0B,48,E6, 71, 
A4,71,AD,0E,80,99,FB,01, 
68,4C,84,81,A6,7A,E6,0B, 
B1,FB,30,03,C8,D®,F9,C8, 
Bil,FB,D®,D3,F®,B6,8A,48, 
AD,OE,80,38,E9,CC,®A,AA, 
BD,32,86,85,FB,BD,33,86, 
85, FC,BD,36,86,85,FD,BD, 
37,86,85,FE,68,AA,60,A9, 
00,85,0D,20,73,00,C9,CD, 
F0,06,20,79,00,4C,8D,AE, 
20,73,00,38,E9,CC,OA,AA, 
BD, 1E,87,8D,68,82,BD, IF, 
87,80,69,82,20,73,99,4C, 
1F,8B,A6,3A,E8,DO,2D,A6, 
CB,E®,07,B0,27,E0,03,990, 
23,E4,C5,F®,1F,86,C5,CA, 
CA,CA,BD,B5,8®,AA,AD,8D, 
02,4A,90,01,E8,20, 13,83, 
B1,FD,F0,06,99,77,902,C8, 
D®O,F6,84,C6,4C,48,EB,20, 
15, FD,20,A3,FD,20,5B,FF, 
58,20, BF,E3,A9,00,A2,80, 
8D,83,02,85,37,86,38,8E, 
84,902,8D,86,02,A9,09,A2, 
07,80,20,D®,8E,21,D®,A9, 
OF,AO,80,20,2D,E4,A9,®A, 
A0,64,80D,0B,80,8C,09,80, 
29,DE,82,4C,9D,E3,78,A9, 
6A,A0,82,8D,8F,02,8C,99, 
02,A9,BE,A®,80,8D,08,03, 
8C,09,03,A9,FB,A®,80,8D, 
06,03,8C0,07,03,A9,37,A0, 
81,8D,94,03,80,05,03,A9, 
3F,A0,82,8D,0A,03,8C,0B, 
03,58,60,A9,00,18,CA,F®, 
04,69,0B,90,F9, 18,69,59, 
85, FD,A9,80,69,00,85,FE, 
AO,00,60,68,68,20,79,90, 
FO, 10,20,EB,B7,8E,0B,80, 
AS,14,8D,09,80,A5,15,8D, 
OA,80,AD,02,03,8D,9C,80, 
AD,03,03,8D,0D,80,A9,5B, 
8D,02,03,A9,83,8D,03,03, 
4C,80,A4,20,61,83,4C,86, 
A4,AD,09,80,AE,0A,80,85, 
63,86,62,A2,90,38,20,49, 
BC,20,DD,BD,A2,00,BD,01, 
®1,F0,09,9D,90,02,20,D2, 
FF,E8,D®,F2,AD,09,80,18, 
6D,0B,80,8D,99,80,90,93, 
EE,0A,890,A9,20,20,D2,FF, 
20,CF,FF,C9,0D,F®,03,4C, 
69,A5,AD,09,80,ED,0B,80, 
8D,09,80,B0,03,CE,0A,80, 
AD,0C,80,AC,0D,80,8D,02, 
03,8C,03,03,4C,76,A5,20, 
EB,B7,8A,D0,03,4C,48,B2, 
86,97,A5,14,48,A5, 15,48, 
A9,80,85,96,20,2E,85,B®, 
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1250 
1260 
1279 
1289 
1290 
1309 
1319 
1320 
1339 
13498 
1350 
1369 
1370 
1389 
1390 
1400 
1410 
1429 
1439 
1440 
1450 
1469 
1470 
1489 
1490 
1599 
1519 
1520 
1539 
1540 
1559 
1560 
1570 
1589 
1590 
1600 
1610 
1620 
1639 
1640 
1650 
1660 
1670 
1689 
1699 
1799 
1710 
1729 
1730 
1740 
1759 
1769 
1779 
1789 
1790 
1899 
1810 
1820 
1839 
1840 
1859 
1860 
1879 
1889 
1839 
1900 
1910 
1929 
1930 
1940 
1950 
1969 
1979 
1989 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA. 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


EC,A9,C1,A®,FE,8D, 18,03, 
80,19,03,A9,00,85,96,68, 
85,15,68,85,14,20,2E,85, 
20,8E,A6,4C,12,85,A90,03, 
B1,7A,48,C8,B1,7A,48,C8, 
20,FB,A8,A2,03,86,0F,86, 


08,A0,FF,C8,E8,B1,7A,9D, 


FC,01,F0,0D,C9,22,D9,0C, 
A5S,OF,A9,FF,85,0F,4C,0B, 
84,4C,D6,84,24,0F,30,E3, 
24,08,30,DF,C9,8F,D0,04, 
85,08,F0,D7,86,97,A2,04, 
DD,B9,80,F0,08,CA,10,F8, 
A6,97,4C,08,84,20,FB,A8, 
290,73,00,B0,79,20,6B,A9, 
A9,00,A2,D6,85,AC,86, AD, 
78,A5,01,48,A9,34,85,01, 
38,A5,AC,ES,FD,AS,AD,ES, 
FE,BO, 1E,A0,02,B1,AC,CS, 
14,D90,07,C8,B1,AC,C5, 15, 
F9,15,A5,AC, 18,69, 04,85, 
AC,AS,AD,69,00,85,AD,90, 
D7,A2,FF,A®O,FF,D0,09,A2, 
®O1,B1,AC,AA,88,B1,AC,AB, 
68,85,01,58,86,62,A2,00, 
86,00,84,63,A2,90,38,20, 
49,BC,20,DD,BD,A6,97,B9, 
00,01,F0,07,E8,9D,FC,®1, 
C8,D0,F4,86,97,A6,97,20, 
79,098,C9,2C,F0,07,C9,AB, 
F0,93,4C,09,84,E8,86,97, 
SD,FC,01,40,48,84,20,FB, 
AB,E8,8A,A8,68,85, 15,68, 
85,14,AD,02,03,8D,0C,80, 
AD,03,03,8D,0D,80,A9,FB, 
8D,02,03,A9,84,8D,03,03, 
4C,A2,A4,AD,0D,80,8D,03, 
03,AD,0C,80,8D,02,03,20, 
BC,AS,AO,05,20,FB,A8,20, 
3B,A9,A0,02,B1,7A,F0,03, 
4C,F6,83,A9,47,AO,FE,8D, 
18,03,8C,19,03,20,59,A6, 
29,33, A5,40,85,E3,A9,00, 
A2,D6,85,FD,86,FE,78,AS, 
01,48,A9,34,85,01,A5,2B, 
A6,20,85,5F,86,60,A0,01, 
B1,5F,F90,44,08,B1,5F,91, 
FD,C8,B1,5F,91,FD,AS, 15, 
C9,FA,B®,3E,48,24,96,390, 
07,91,5F,88,A5,14,91,5F, 
AO,00,A5,14,91,FD, 18,65, 
97,85, 14,C8,68,91,FD,69, 
00,85, 15,B0,1D,AS,FD,69, 
04,85,FD,98,02,E6,FE,Bl, 
5SF,AA,88,B1,5F,40,42,85, 
A®,®01,A9,FF,91,FD,C8,91, 
FD, 18,68,85,01,58,69,20, 
DE,82,20,79,00,D0,52,A9, 


01,8D,0E,80,A2,00,BD,Bl, 


890,20,D2,FF,E8,E0,05,D®, 
F5,AE,0E,80,A9,00,20,CD, 
BD,A9Q,20,20,D2,FF,A9,22, 
20,D2,FF,AE,O0E,80,29,13, 
83,B1,FD,C9,0D,F®,0A,C9, 
00,F®,0B,20,D2,FF,C8,D®, 
F0,A9,5F,20,D2,FF,A9, 22, 
20,D2,FF,EE,OE,80,AD,O®E, 
80,C9,09,90,B7,60,4C,48, 
B2,20,9E,B7,8A,F0,F7,C9, 
09,B0,F3,20,13,83,20,FD, 
AE,20,9E,AD,20,A3,B6,€9, 
0B,90,03,4C,58,B6,86,14, 
84, 15,AA,AO,00,CA,30,0D, 
B1,14,C9,5F,D0,02,A9,0D, 
91,FD,C8,D0,F0,A9,00,91, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 


DATA 
DATA 


DATA 8A,48,20,3E,88,68,48,AA, 
DATA AS, 14,9D,3A,86,9D,45,86, 


WWW. HOMESOMPUTERWOREB.EOM 


FD,60,5B,86,FF,86,D3,86, 
1E,87,09,04,00,090,09,00, 
E8,07,00,00,00,090,21,04, 
092,9090,09,090,09,909,00,01, 
A9,00,A2,15,9D,3A,86,CA, 
10,FA,60,41,55,54,CF,4B, 
45,D9,52,45,4E,55,CD,41, 
43,54,49,56,05,54,41,42, 
4C,0C5,56,4F,49,43,05,43, 
40,45,41,0D2,53,4F,55,4E, 
C4,50,55,40,D3,45,4E,56, 
45,40,4F,50,05,48,4F,4C, 
C4,57,41,56,C5,46,49,4C, 
54,45,D2,56,4F,4C,55,4D, 
05,52,45,53,4F,4E,41,4E, 
DA,S2,45,53,54,41,52,D4, 
50,4F,49,4E,54,45,D2,53, 
57,49,54,43,0C8,50,41,55, 
53,05,49,52,51,4F,CE,49, 
52,51,4F,456,0C6,54,53,41, 
56,0C5,00,2B,83,9F,895,BF, 
83, DE,82,50,88,92,88,59, 
86,31,89,57,89,7F,89,AB, 
89,D7,89,11,8A,4B,8A,7B, 
SA,AF,SA,D1,8A,DB,SA,08, 
8B,FA,8A,F7,8A,71,8B,5®, 
4F,49,4E,D4,43,55,52,52, 
45,4E,D4,49,4E,46,CF,54, 
41,42,53,54,41,52,D4,54, 
41,42,45,4E,C4,00,1F,8B, 
35,8B,3B,8B,4B,8B,5E,8B, 
10,20,490,80,8A,0A,AA,BD, 
3A,87,85,22,BD,3B,87,4C, 
45,A4,50,87,6B,87,79,87, 
89,87,95,87,A4,87,AE,87, 
B7,87,C2,87,CD,87,D7,87, 
E4,87,F5,87,FE,87,0E,88, 
21,88,2B,88,54,41,42,4C, 
45,20,55,4E,44,45,46,49, 
4E,45,04,54,41,42,4C0,45, 
20,4F,56,45,52,46,4C,4F, 
D7,56,4F,49,43,45,2®,4E, 
4F,54,20,41,43,54,49,56, 
C5,4C,4F,2D,42,59,54,45, 
3D,5A,45,52,CF,42,41,44, 
20,4F,53,43,49,4C0,4C,41, 
54,49,4F,CE,42,41,44,20, 
41,54,54,41,43,CB,42,41, 
44,20,44,45,43,41,D9,42, 
41,44,20,53,55,53,54,41, 
49,CE,42,41,44,20,52,45, 
40,45,41,53,05,42,41,44, 
20,56,4F,4C,55,4D,C5,42, 
41,44,20,46,52,45,51,55, 
45,4E,43,D9,4E,4F,20,56, 
4F,49,43,45,20,20,44,45, 
46,49,4E,45,0C4,42,41,44, 
20,56,4F,49,43,0C5,54,41, 
42,40,45,20,20,52,45,44, 
45,46,49,4E,45,0C4,49,4C, 
40,45,47,41,40,20,54,41, 
42,40,45,20,56,41,4C0,55, 
C5,30,3D,4E,4F,2F,31,3D, 
59,45,D3,54,53,41,56,45, 
20,57,49,54,48,4F,55,54, 
20,54,41,42,40,C5,20,FD, 
AE,20,8A,AD,20,F7,B7,AS6, 
14,A5,15,60,A2,0C,4C,2C, 
87,20,9E,B7,8A,F0O,F5,C9, 


04,B80,F1,60,20,51,88,2®, 
9B,88,F0,04,A2,0D,DO,SC, 


’ 
AS,15,9D,3B,86,9D,47,86, 
20,3E,88,68,AA,A5S, 14,9D, 
40,86,A5,15,9D,41,86,4C, 
E7,88,20,51,88,8E,4F,86, 
4C,A8,88,CA,8A,0A,AA,BD, 
SA,86,D0,03,BD,3B,86,6®, 
AE,4F,86,D0,04,A2,0B,D®, 
13,BD,4B,86,F0,04,A2,02, 
D®,0A,20,54,88,20,9B,88, 
D0,05,A2,00,4C,2C,87,20, 
E7,88,38,BD,40,86,FD,46, 
86,8D,0C,80,BD,41,86,FD, 
47,86,D0,CB,AD,0C,890,C9, 
05,B0,C4,A2,01,D®,DD,BD, 
47,86,DD,41,86,90,B8,F®, 
04,A2,0E,D®,CF,BD,46,886, 
DD,40,86,90,AA,F0,A8,DO, 
F0,48,A9,00,290,09,89,68, 
60,8D,0C,80,98,48,8A,48, 
20,EF,8A,BD,46,86,85,FD, 
BD,47,86,85,FE,FE,46,86, 
DO,03,FE,47,86,A0,00,AD, 
©C,80,91,FD,68,AA,68,A8, 
60,20,A8,88,290,41,88,E®, 
092,D0,05,A2,03,40,2C,87, 
48,8A,20,09,89,68,20,09, 
89,20,F1,B7,8A,20,09,89, 
20,F1,B7,8A,4C,09,89,20, 
A8,88,20,41,88,48,29,F®, 
F0,05,A2,0A,4C,2C0,87,20, 
01,89,A9,02,290,09,89,8A, 


20,09,89,68,4C,99,89,09, 
190,B0,01,60,4C,2C,87,20, 
A8,88,20,F4,B7,84,A2,05, 
20,77,89,0A,0A,0A,OA,8D, 
0C,80,20,F1,B7,8A,A2,06, 
290,77,89,0D,0C,80,48,20, 
01,89,A9,00,20,09,89,68, 
4C,09,89,20,A8,88,20,FA, 
B7,8A,A2,07,20,77,89, 0A, 
OA,OA,0A,8D,0C,80,20, Fl, 
B7,8A,A2,08,20,77,89,0D, 
0C,80,48,20,01,89,A9, 01, 
D0,D2,A2,04,4C,2C,87,20, 
A8,88,20,9E,B7,CA,EO, 04, 
BO,F®,BD,28,87,48,20,FF, 
89,90,04,68,09, 02,48, 20, 
FF,89,90,04,68,09,04,48, 
20,01,89,A9,03,D®,A5,29, 
FD,AE,20,9E,B7,E0,02,B®, 
03,E0,01,69,A2,0F,4C,2C, 
87,20,A8,88,20,41,88,8E, 
0C,80,86,FD,SD,0D,80,29, 
F8,F0,04,A2,0A,D0,E7,A2, 
05,0E,0C,80,2E,0D,80,CA, 
D®O,F7,AD,0D,80,48,A5,FD, 
29,97,48,A9,04,20,01,89, 
20,09,89,68,20,09,89,68, 
4C,09,89,20,A8,88,20,9E, 
B7,8A,A2,09,20,77,89,48, 
20,FF,89,90,04,68,09,10, 
48,20, FF,89,90,04,68,09, 
20,48,20,FF,89,90,04,68, 
09,49,48,29,01,89,A9,06, 
4C,A4,89,20,A8,88,20,9E, 
B7,8A,A2,04,20,77,89, 0A, 
OA,0A,0A,48,20,FF,89,90, 
04,68,09,01,48,20,FF,89, 
90,04,68,09,02,48,20,FF, 
89,90,04,68,09,04,48,20, 
01,89,A9,05,4C,A4,89,20, 
A8,88,20,EF,SA,BD,3A,86, 
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85,14,BD,3B,86,85,15,A9, 
09,20,01,89,20,09,89,A5, 
14,20,09,89,A5,15,4C,09, 
89,20,A8,88,20,41,88,A9, 
®A,D®O,E6,20,A8,88,20,01, 
89,A9,08,20,09,89,AE,4F, 
86,A9,01,9D,4B,86,60,AE, 
4F,86,CA,8A,0A,AA,60,4C, 
1IF,C0,A2,05,BD,3A,86,9D, 
26,C0,CA,10,F7,4C,90,C®, 
20,9E,B7,8A,48,20,01,89, 
A9,07,40C,A4,89,84,63,85, 
62,A2,99,38,4C,49,BC,20, 
FA,AE,20,51,88,20,F2,8A, 
BD,46,86,A8,BD,47,86,20, 
15,8B,4C,F7,AE,AC,4F,86, 
4C,A2,B3,20,FA,AE,20,51, 
88,BD,4B,86,A8,20,A2,B3, 
4C,F7,AE,20,FA,AE,20,51, 
88,20,F2,8A,BD,3A,86,A8, 
BD,3B,86,4C,2F,8B,20,FA, 
AE,20,51,88,20,F2,8A,BD, 
40,86,A8,BD,41,86,4C,2ZF, 
8B,20,51,88,20,9B,88,D®, 
05,A2,10,40,20,87,8A,48, 
20,FD,AE,20,D4,E1,68,AA, 


78,A9,46,A2,C0,8D, 14,03, 
8E, 15,03,A2,02,20,67,C1, 
CA,10,FA,A2,02,A9,01,9D, 
33,C0C0,CA,10,FA,58,60,4C, 
B1,C1,A2,EA,DO,DF,00,00, 
09,90,090,090,00,00,900,90, 
09,900,090,900,00,90,00,DA, 
07,D4,0E,D4,00,090,00,00, 
09,00,090,20,20,20,A5,B®, 
48,A5,B1,48,A5,B2,48,A5, 
B3,48,A9,03,8D,32,C0,CE, 
32,C0,10,0F,68,85,B3,68, 
85,B2,68,85,B1,68,85,B®, 
4C,31,EA,AE,32,C0,BD,33, 
C®0,F0,E4,BD,3C,C®,F®,15, 
DE,3C,C®,D0,DA,20,82,C1, 
AE,32,C0,A0,04,BD,43,C®, 


4 91,B2,40,57,C0,BD,3F,C®, 


F0,06,DE,3F,C0,4C,57,C®, 
20,82,C1,20,9F,C1,C9,00, 
FO,1F,91,B2,20,9F,C1,91, 
B2,20,9F,C1,9D,3C,C®,20, 
9F,C1,9D,3F,C0,BD,43,C®, 
09,01,A0,04,91,B2,4C,57, 
C0,20,9F,C1,0A,AA,BD,DS, 
C0,8D,D6,C0,BD,D9,C0,8D, 
D7,C®O,AE,32,C0,4C,FF,FF, 
20,C1,2A,C1,3B,C1,31,C1, 
11,C1,08,C1,FF,CO,F6,C®, 
EE,C0,61,01,4D,C1,A9,090, 
9D,33,C0,40,57,00,20,9F, 
C1,9D,3F,C0,40,57,C0,20, 
9SF,C1,8D,18,D4,40,6B,C®, 
20,9F,C1,8D, 17,D4,4C,6B, 
C0,20,9F,C1,8D,15,D4,20, 
9F,C1,8D,16,D4,4C,6B,C®, 
20,9F,C1,A0,05,91,B2,4C, 
6B,C9,290,9F,C1,A0,06,D®, 
F4,20,9F,C1,9D,43,C®,AD®, 
04,DO,EA,20,9F,C1,48,20, 


8B88 3790 
8B90 3710 
8B983 3720 


60000 


60010 


60020 


60038 
69048 
60950 
69062 
60970 
60082 


608308 


DATA BD,3A,86,85,FD,BD,3B,86, 79 
DATA 85,FE,BD,47,86,A8,BD,46, 52 
DATA 86,AA,AYS,FD,4C,D8,FF,®0, FC 


FOR A=-32768 ID 35736 STEP 
B:5=-8:C=-9:FOR B=B TO 7: 
GDSUB' 60940 
STSHHFL>E7E=SI255:7S5=255-5 
AND 255:POKE A+B,H+L:NEXT 
B:60OSUB 60949 
F$="PRUEFSUMME OK”: IF S<> 
H+L THEN FS="ARUSU 
PRUEFSUMMENFEHLER": F=F+1 
GOSUB 608908:NEXT A:PRINT 
ADDWNÜ”F"FEHLER”:END 

READ H$:G0SUB 60050: H=L* 
16:H$=MNID$ CHS,2) 

L=ASC CHS+"X”)-48: IF L<O 
DR L>22 THEN 60080 

IF L<18 THEN RETURN 
L=-L-7:IF L>3 THEN RETURN 
FS="ARUSUEINGABEFEHLER”:L= 


4359 


5934 


5639 


2267 


e715 


3198 


1944 
1334 
e46B 


O:F=F+1 
PRINT. "ZEIPEFFPEFR ICH) 
ES6+PEEK (63)3FS: RETURN 


9F,C1,A0,03,91,B2,88,68, 
91,B2,4C,6B,C0,20,9F,C1, 
48,20,9F,C1,AE,42,C0,9D, 
2D,C0,68,9D,2C,C0,4C,6B, 
Cc0,20,67,C1,4C;6B,C0,8A, 
48,0A,AA,BD,26,C0,9D,2C, 
C0,BD,27,C0,9D,2D,C0,68, 
AA,A9,09,9D,3C,C®,9D,3F, 
C0,60,8A,0A,AA,8E,42,C®, 
BD,2C,C0,85,B®,BD,2D,C2, 
85,B1,BD,36,C0,85,B2,BD, 
37,C0,85,B3,AO,FF,60,C8, 
B1,B®O,AE,42,C0,FE,2C,C®, 
D®O,03,FE,2D,C®,AE,32,C®, 
60,78,A9,00,8D,18,D4,A9, 
31,A2,EA,4C,05,C0,09,00, 


FOR A=49152 TO 49592 STEP 
8:5=-®8:C=9®:FOR B=® TOD 7: 
GOSUB 60940 
S=StH+LZE76E=55255:5=-25575 


"AND 255:POKE A+B,H+L:NEXT 


B:GOSUB 60049 
F$="PRUEFSUMME OK”: IF S<> 
H+L THEN F$="LRUSI 
PRUEFSUMNENFEHLER”: F=F+1 
GOSUB 60098:NEXT A:PRINT 
CDOWNI"F"FEHLER”: END 
READ H$:G0SUB 60050: H=L* 
16:H$=MID$ CHS,2) 

L=ASE CHS+"X")-4B: IF L<® 
OR L>22 THEN 60088 

IF L<1® THEN RETURN 
L=L-7: IF L>3 THEN RETURN 
FS="LRUSIEINGABEFEHLER”:L= 
O:F=F+l 

PRINT "ZEILE" PEEK (64)* 
2S6+PEEK (633F$: RETURN 


2726 


Listing 3:Kombinierter Hexdump-Basiclader von.MUSIK-INT 


56 QUM Sonderheft 2 
WARNT HONECOMPUTERWORLD. COM 


REM DEMO 1 

PRINT”IDENGO 1 MUSIK-BASIC V1.0” 
PRINT”ABBERECHNE VARIABLEN” 

REN]. 2& BI ECEIZ<SNOTEFE DKTAUE 2 
REM Z.B. CHi4)=NOTE C# DKTAVE 4 
FORI=-@TD7 

ELII=35643727@7-73 
EHFDI=-37XE/ERE III 
DC1)=4900988/21(7-1) 
DHCII=423877/2107-12 
ECII-YHYHSO7ZL/ETE7ZII 
EC1I2=475787e1 12 
FHCI)=504907/21(7-1) 
561)=-534303/27C7-72 
GHC1)=5S6589/21C7-I1) 

ACT=599I44/ 210713 
AHC1II=-835908/21C(7-1) 
HOIDMBZEBAIET ZI 

NEXTI 


FORI-542721054272+24: POKEI,O 
NEXT:REM SID RESET 


REM ZEITWERTE DER NOTEN 
N1=38: REM GANZE NOTE=-1 SEC 
N2=N1/2:REM HALBE NOTE 
N4=N1/4:REM VIERTEL NOTE 
NB=N1/B: REM ACHTEL NOTE 


REM ZEITWERTE DER PAUSEN 
PI=N1 : P2=N2: P4=N4 : PB=NB 


PRINT” sIEBERECHNE MUSIKTABELLENBIe]” 
TABLE1 , 495B6 , 58693 
TABLE2, 53228, 53247 
TABLE3, 53209, 53247 


UDICE2 
SWITCH 


VOICE 

0-4 

ENVELOPE2,2 
HOLD13,8 

PULS 2900 

FILTER 2020 
RESONANZ 15,0,0,0 
WAUE3,8,0 
VOLUME1S,0,0,0 


GHCOI,NY4,P4 


FHCBISNIFT ESS REITS 


E(D)I,N8,P8 
ECO) ,N4,P4 
DHCD),NG,P4 


DHEBIENFEILSSRIFTIES 


DH(O),NS,P8B 
E(0O),N4,P4 
E(O),N4,P4 


DH NPIFST REIFE 


CH(D),NB,PB 
CHCO),N4,P4 
HCO-1),N4, P4 
HCO-1),N4, P4 
HCO-1),N4, P4 
DHCO),N4,P4 
HCD-1),N4,P4 
DHCO),N4,P4 
HCO-1),N4,P4 
ACO),N2,P2 
ACO),N2,P2 
HCO-1),N4, P4 
ACO),N4,P4 
HCO-1),N4, P4 
ACO),N4,P4 
HCO-1),N4, P4 
GH(CD) ,N4,P4 
GH(DI,N2,P2 
HCO-1),N4,P4 
GHCO),N4,P4 
GHCO),N4, P4 


ERCON; NEWS STRHNTS 


ECDO),NB,P8 
DHCDI,N4,P4 
FHCO),N4,P4 


EHLOIFNSAIESTRINTLNS 


DHCO),NB,PB 
CHCO),N4,P4 
ECO),N4,P4 
ECO),N4,P4 
CHCD),N4,P4 
HCO-1),N4,P4 
P1*2+P4*2 
HCO),N4,P4 
GH(D),N2,P2 
CHCO+1),N4,P4 
HCO),N4,P4 
GH(O),N2,P2 
P4*2 


SOUND H{D-1),N4,P4 ECOFII7 NETZ SSRH#TS 


SOUND 
SDUND 
SDUND 
SDUND 
SOUND 
SDUND 
SOUND 
SCUND 
SDUND 
SDUND 
SOUND 
SDUND 
SOUND 
SDUND 
SOUND 
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DHCOI,N4,P4 
HCO-1),N4,P4 
DH(O),NY,P4 
HCO-1),N4,P4 
ACO),N4,P4 
AD) ,N2,P2 
HCO-1).N4,P4 
ACO),N4,P4 
H(D-1),N4,P4 
ACO),N4,P4 
HCO-1),N4,P4 
GHCO),N4,P4 
GHCO),ND,P2 
HCO-1),N4,P4 
GHCO),N4,P4 


DHCO+1),NB,P8 
CHCO+1),N4,P4 
HCO)J,N4, P4 
ACO),N4,P4 
FHCD),N2,P2 
P4*2 


FICDDEINEERA SED E 


GH(O),NB,PB 
FHCOJ,N4,P4 
GH(D)I, N4,P4 
ACO)>,N4,P4 
ACO)I,N4,P4 
ACDI,N4,PH4 
HCO) ,N4,P4 


DHCO+1),N4*1.5,P4*1.5 
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SOUND CH(O+1)5,N8,PB 
SOUND H(CD3,N4,P4 
SOUND A(D)3,N4,P4 
SOUND GH(CDJ,N4,P4 
SOUND CHCO+1),N4,P4 
SOUND H(CD)I,N4,P4 
PAUSE P4*2 

SOUND HCDI,N4,P4 
SOUND GH(CDI,N2,P2 
SDUND CHCO+1),N4,P4 
SDUND HCDO),N4,P4 
SOUND GHCO),N2,P2 
PAUSE: P4*2 

SOUND ECO+1),N4*#1.5,P4*1,5 
SOUND DHCO+1),N8,P8 
SDUND CHCO+1),N4,P4 
SOUND HCO),N4,P4 
SDUND ACD),N4,P4 
SOUND FHCO),NZ2,P2 
SOUND FH{O)I,N4,P4 
SOUND ACD),N4*1.5,P4*1,5 
SDUND GH(COI,NB,PB 
SOUND FHCO)I,NY,PH 
SOUND GHCDOI,N4,P4 
SOUND ACD),N4,P4 
SDUND HCDI,N4,P4 
SDUND CHCO+1),N4,P4 
PAUSE PB*2 

SOUND ECH(O+1),N8,P8B 
SDUND HCO-1)3,N4,P4 
SOUND HCO-1),N4,P4 
SDUND CHCO) ,N4,P4 
SOUND DHCDI,N4,P4 
SOUND .ECDI,N4,P4 
PAUSE P4*2 

SOUND E(CO+1) ,N4*1.5,P4*1.5 
SOUND E(0O+1),N8,PB 


Listing 4 (oben) und 5 (unten): Demos zu MUSIK-BASIC 


REM DEMO 2 
PRINT”’ZDEND 2 MUSIK-BASIC V1.0” 
PRINT”BERECHNE MUSIKTABELLEN” 


CLEAR 

TABLE1,49586, 50633 
TABLE2,590700,51839 
TABLE3, 51908, 53247 


VODICE2 

ENVELOPE 8,08 

HOLD 11,3 

PULS 2000 

WAUE3,1,0 
VOLUME11,1,0,0 
RESONANZ 15,0,0,1 
FILTER 2047 

PAUSE2SS 

P2=POINTC2) 
FORI=2901T04650STEP22 
SOUNDI,®,® 

NEXT 
FORI=46S0TO2901STEP-29 
SOUNDI,®,® 

NEXT 
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SOUND DHCO+1),N4,P4 
SDUND DHCO+1),N4,P4 
SDUND CHCO+1),N4,P4 
SOUND CHCO+1),N4,P4 
SOUND HcO),N4,P4 
SOUND HCO),N4,P4 
SOUND CHCO+1),N4*1.5,P4*1,5 
SOUND CH(O+1),N8,P8 
SDUND HCO),N4,P4 
SOUND HCO),N4,P4 
SOUND ACO),N4,P4 
SOUND ACO),N4,P4 
SOUND GHCO),N4,P4 
SOUND GH(D),N4,P4 
SOUND ECO+1),N4*1.5,P4*1.5 
SOUND ECO+1),N8B,P8 
SOUND DHCO+1),N4,P4 
SOUND DHCO+1),N4, P4 
SOUND CHCO+1),N4,P4 
SOUND CHCO+1),N4, P4 
SOUND HCO),N4,P4 
SOUND H(C0),N8,P8 
SOUND H(O),NB,PB 
SOUND HcO),N4,P4 
SOUND EHCO+1),N4,P4 
PAUSE P4*2 

SOUND DHCOI,N4, P4 
SOUND DHCO),N4,P4 
SOUND EcO),N4,P4 
PAUSE P4*2 

PAUSE P4*2 

RESTART 


PRINT”aIMUSIK EIN: SIRODNM”; 

PRINT” MUSIK AUS: SIRDOFFE” 
PRINT” Bis] RODNEIs}” 

PRINT” IROOFF : POKES4272+24, BOIIIIIY” 


POINTER P2 


VOICE 
ENVELOPE 1,08 
HOLD1S,1 
WAUE4H,0,0 
PAUSE10® 
P1=-POINT(C1) 
SDUND12208,2,2 
SOUND1308,2,2 
POINTER P1 


VOICE3 
ENVELOPE1,® 
HOLDI1S,1 
WAVEH,0,0 
R3=POINTC3) 
SODUND1200,3,3 
SDUND 728,3,3 
POINTER P3 


PRINT” elseMUSIK EIN: SIRDONM”; 
PRINT” MUSIK AUS: SIRDOFFE@” 
PRINT” sielels}] RODN ale)” 

PRINT” IRBOFF : POKES4272+24 , OTIIIIIJ’ 


‘ Verfügung. 


Mit Floppymaster 


zum Diskettenmeister 


Die Floppy 1541 ist ein vielseitiges 
Instrument. Fachkundig bedient, 
nimmt sie dem Programmierer die 
Knochenarbeit bei der Datenver- 
waltung ab. Bei. Fehlbedienung 
aber kann sie die Ergebnisse mo- 
natelanger Bemühungen in Bitge- 
stammel zerstäuben. 

Will man die Möglichkeiten des 
Laufwerks ausschöpfen, ohne 
wertvolle Programme in den Da- 
tenhimmel zu befördern, braucht 
man ein verläßliches Hilfspro- 
gramm. Floppymaster stellt alles 
zur Verfügung, was man zur Mani- 
pulation von Dateien benötigt. 
Auch das Laufwerk selber ist nicht 
tabu: Der Execute-Befehl startet 
Maschinenprogramme im Floppy- 
RAM. Eingriffe ins DOS lassen 
sich direkt am Bildschirm durch- 
führen. 

Floppymaster ist ein Programm, 
das mit den Fähigkeiten seines Be- 
nutzers wächst. Einsteiger werden 
die übersichtlichen Bildschirm- 
masken zu schätzen wissen. Fort- 
geschrittenen steht ein Arsenal 
ausgeklügelter Tool-Befehle zur 
Das Meisterpro- 
gramm erledigt drei Aufgaben: Es 
ist Diskettenmonitor, Diskettenedi- 
tor und Disk-Doktor in einem. Da- 
bei greift es auf alle wichtigen Tei- 
le der Diskette (Sektoren, Direc- 
tory, BAM) und des Laufwerks zu 
(DOS, Puffer, RAM). 

Das Hauptmenü stellt 12 Pro- 
grammpunkte zur Verfügung. Sie 
werden mit Hilfe der vier Cursor- 
tasten angewählt. Der ausgewähl- 
te Punkt erscheint revers. Mit der 
Return-Taste wird die Wahl bestä- 
tigt; Floppymaster verzweigt in 
das gewünschte Unterprogramm. 
Tritt ein Floppy-Fehler auf, wird 
die entsprechende Fehlermel- 
dung ausgegeben. Diese muß 
durch Drücken einer beliebigen 
Taste quittiert werden, bevor wie- 
der in das Hauptmenü gesprun- 
gen wird. ‚ 

Der Bildschirmaufbau ist bei allen 
Unterpunkten identisch: Die er- 
sten drei Zeilen des Bildschirms 


Hier ist das beste Disk- 


Tool, das wir je im 


Laufwerk hatten: Ob 
BAM oder DOS, ob 
ROM oder RAM — 

die Floppy wird nach 

allen Regeln der Kunst 


verarztet. 


werden von der Befehlszone be- 
legt. Hier werden alle für den Be- 
nutzer wichtigen Informationen 
angezeigt. Im mittleren Teil, der 
Datenzone, werden die von der 
Diskette eingelesenen Daten aus- 
gegeben. Die unteren drei Bild- 
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Bild 1: Sektoren Edit 
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schirmzeilen zeigen die verfügba- 
ren Befehle. 


Sektoren Edit 
TREE 


Mit diesem Programmpunkt kön- 
nen einzelne Blöcke einer Disket- 
te editiert werden. Bei Anwahl 
des Punktes wird der Block 18.0 
von Diskette eingelesen und an- 
gezeigt. In der ersten Zeile der 
Befehlszone wird links oben Track 
und Sektor des aktuellen Blocks 
angegeben (Bild 1). Rechts dane- 
ben wird der Input-Sektor ange- 
zeigt. Das ist der Block, auf den 
die ersten beiden Bytes des aktu- 
ellen Blocks deuten. Das ist immer 
dann der Fall, wenn Blöcke aus 
längeren Datenstrukturen, zum 
Beispiel einem Programm, bear- 
beitet werden. Im Datenfeld hat 
nur die Hälfte des Blocks Platz, 
also 128 Bytes. In der zweiten Zei- 
le der Befehlszone wird deshalb 
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hinter „Bytenummer“ eine Null an- 
gezeigt. Blättert man auf die zwei- 
te Hälfte um (S), erscheint hier die 
Zahl 128. In dem rechts daneben- 
liegenden Feld wird der Inhalt 
dieses Bytes, der „Bytewert", an- 
gezeigt. Die Daten können dezi- 
mal, hexadezimal oder in ASCI- 
Form ausgegeben werden. In der 
letzten Zeile der Befehlszone er- 
scheint die letzte gültige Meldung 
der Floppy. Hier erkennt man, ob 
eine Diskettenoperation geklappt 
hat. 

Die Befehle werden durch Drük- 
ken der entsprechenden Taste an- 
gewählt. Es gibt zwei Modi: den 
Befehls- und den Änderungsmo- 
dus. Vom Befehlsmodus in den 
Änderungsmodus gelangt man mit 
'A', zurück mit 't'. 

a) Befehlsmodus 

A-endern: Sprung in den Ände- 
rungsmodus. Befehle siehe unten. 
‘ C-opy: Block kopieren., Neben 
dem Sektorfeld erscheint „kopie- 
re nach:", 
Track und Sektor wird der Block 
festgelegt, in den kopiert wird. 
F-inde: Finde nächsten Block, des- 
sen Inhalt von Null verschieden 
ist, Der nächstfolgende Block, von 


FILENUMMER 3: 
SFPEICHERLAGE 
FILENAME 
"DIA SHOW 2" 
"AUGEN AUF.FIC" 


"SARGON.FIC" 


"STROLCHI.FIC" 


Durch Eingabe von, 


dem mindestens ein Byte einen 
Wert ungleich Null hat, wird ein- 
gelesen. Tritt ein Lesefehler auf, 
wird der letzte lesbare Block 
(kann auch ein Nullblock sein!) 
ausgegeben. Durch einen Fehler 
im Betriebssystem der Floppy, 
wird bei der Formatierung das 
erste Byte eines Blocks auf 75 und 
alle weiteren Bytes auf den Wert 1 
gesetzt. Diese Blöcke werden 
auch als Nullblöcke behandelt. 
H-ardcopy: Druckt eine Bild- 
schirmhardcopy. Ist kein Drucker 
angeschlossen, wird der Befehl 
ignoriert. 

L-etzten: Sucht den letzten legalen 
Block in einer Blockstruktur, wo- 
bei von dem aktuellen Block aus- 
gegangen wird. Der Block wird 
eingelesen und angezeigt. 
N-ächsten: Der logisch nächste 
Block wird eingelesen und ange- 
zeigt. Dies ist der Block, der-im In- 


‚ put-Sektor-Feld angezeigt wird. 


Wenn kein logisch folgender 
Block existiert, wird eine Fehler- 
meldung der Floppy ausgegeben. 
R-ead: Der angezeigte Block wird 
nochmals eingelesen. Dies ist 
wichtig, wenn man sich beim An- 
dern von Daten geirrt hat und von 


TR: TRACK SE: SEETOR 


BLOCKS TYF .TR SE 


"MICKEY MOUSE.FIC" 


"MICRO FAINTER.FI" 


"KOPF.PIC" 


"FALCONS.PIC" 
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AENDER: 


Bild 2: Directory Edit 
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RETURN CURSOR INST DELFUTt+ 
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vorn beginnen möchte. 

S-kip: Die angezeigte Blockhälfte 
wird gewechselt. . 

V-orwärts: Der unmittelbar näch- 
ste Block wird gelesen und ausge- 
geben. Wenn das Ende eines 
Tracks erreicht wurde, wird der 
erste Block des nächsten Tracks 
gelesen. 

W-rite: Der aktuelle Block wird 
auf Diskette zurückgeschrieben. 
Z-urück: Der unmittelbar vorher- 
gehende Block wird eingelesen 
und angezeigt. Ist der Anfang ei- 
nes Tracks erreicht, wird der letz- 
te Block des vorhergehenden 
Tracks gelesen. 

t: Rücksprung in das Hauptmenü. 
Achtung: der Block wird nicht zu- 
rückgeschrieben, alle Anderun- 
gen werden daher nicht berück- 
sichtigt. 

#: Auf dezimale Ausgabe um- 
schalten (Voreinstellung!) 

$: Auf hexadezimale Ausgabe um- 
schalten. 

1—9: Im Input-Sektor-Feld Block 
festlegen, der eingelesen werden 
soll. Es ist zuerst der Track und 
dann, getrennt durch ein Leerzei- 
chen, der Sektor anzugeben. 
Wenn eine Eingabe nicht akzep- 
tiert wird, wurde ein nicht existie- 
render Block ausgewählt. 

b) Änderungsmodus: 

Das erste Byte der Datenzone er- 
scheint revers. Mit den Cursorta- 
sten kann dieses Feld über den 
Bildschirm bewegt werden. Ist 
das Ende einer Bildschirmhälfte 
erreicht, wird automatisch auf die 


. ‚andere Hälfte umgeschaltet. Alle 


Eingaben beziehen sich auf das 
Byte, das revers unterlegt ist. 
INST: An der Cursorposition ein 
Nullbyte einfügen. Alle weiteren 
Bytes werden um eine Position 
nach rechts verschoben. Das letz- 
te Byte des Blocks wird herausge- 
schoben. 

DEL: Das vor dem Cursor stehen- 
de Byte löschen. Alle folgenden 
Bytes werden um eine Position 
nach links verschoben, am Ende 
des Blocks ein Nullbyte eingefügt. 
Z-ero: Alle Bytes ab Cursor-Posi- 
tion mit dem Wert Null belegen. 
#: Auf dezimale Eingabe um- 
schalten (Voreinstellung!) 

$: Auf hexadezimale Eingabe um- 
schalten. 


“; Auf ASCIL-Eingabe umschalten. 
Man kann jetzt wie auf einer 
Schreibmaschine eingeben. 

‚t: Rücksprung in den Befehlsmo- 
dus. 


Directory Edit 
Bl 


In diesem Programmteil kann das 
Directory einer Diskette manipu- 
liert werden. Bei Anwahl des Me- 
nüpunktes wird das Inhaltsver- 
zeichnis der Diskette eingelesen, 
die sich gerade im Laufwerk be- 
findet. In der Befehlszone wird 
hinter „Filenummer" die Nummer 
des Files ausgegeben, das als 
erstes in der Datenzone angezeigt 
wird (Bild 2). In der Datenzone 
werden die ersten acht Einträge 
- des Directory mit Name, Block- 
‘zahl, Filetyp und Anfangsblock 
aufgelistet, Diese Parameter kön- 
nen im Änderungsmodus manipu- 
liert werden. 

a) Befehlsmodus: Y 
A-endern: Sprung in den Ände- 
rungsmodus. Befehle siehe unten. 
D-elete: alle gelöschten Files, de- 
ren Typ „DEL" ist, werden aus 
dem Directory entfernt. Sie ver- 
schwinden im Gegensatz zum 
„Scratch"-Befehl wirklich auf Nim- 
merwiedersehen. 

H-ardcopy: Druckt eine Bild- 
schirmhardcopy,. Ist kein Drucker 
angeschlossen, wird der Befehl 
ignoriert. 

R-ead: Das Original-Directory 
wird nochmals eingelesen. Dies 
ist wichtig, wenn man sich beim 
Ändern von Daten geirrt hat und 
von vorn beginnen möchte. 

S-ort: Das Directory wird alphabe- 
tisch sortiert. Mit dem „Scratch"- 
Befehl gelöschte Files, die den 
Typ „DEL“ aufweisen, werden 
mitsortiert. Will man dies verhin- 
dem, muß vorher der D-Befehl 
eingesetzt werden. 

W-rite: Das angezeigte Directory 
wird neu gebunden und auf Dis- 
kette zurückgeschrieben. 

t: Rücksprung in das Hauptmenü. 
Achtung: Das Directory wird nicht 


zurückgeschrieben, alle Ände- 
. rungen werden daher nicht be- 
rücksichtigt. 


1—9: Im Eingabefeld kann durch 


als beendet, 


Floppy 


Eingabe der Nummer des ersten 
auszugebenden Files der Aus- 
schnitt des Directory bestimmt 
werden, der auf dem Bildschirm 
ausgegeben werden soll. 

b) ÄAnderungsmodus: 


‚Im Anderungsmodus erscheint 


vor dem ersten File ein Pfeil. Die- 
ser wird mit den Tasten Cursor-Up 
und Cursor-Down nach oben und 
unten bewegt. Wenn das Ende 
des Bildschirms erreicht wird, 
wird das Directory gescrollt. Alle 
Befehle beziehen sich auf das File, 
das durch den Pfeil gekennzeich- 
net ist. 

RETURN: Hiermit können nach- 
einander Filename, Blockzahl, 
Typ sowie Anfangsblock des Files 
geändert werden. 

l) Filename ändern: Der Filename 
kann beliebig geändert werden. 
Folgendes ist zu beachten: Flop- 
pymaster bietet mehrere Möglich- 
keiten an, einen Namen als been- 
det zu kennzeichnen. Absolut vor- 
rangig sind „Gänsefüßchen" oder 
Shift-Space als Begrenzer. Nach 
diesen Zeichen werden alle fol- 
genden Zeichen abgeschnitten. 
Tritt keines der beiden Zeichen 
auf, gilt der Filename an der Stelle 
nach der keine 
Zeichen außer Leerzeichen mehr 
auftreten. Werden mehr als 16 
Zeichen eingegeben, wird der 
Rest abgeschnitten. 

2) Blockzahl ändern: Es kann jede 
beliebige dreistellige Zahl einge- 
geben werden, das heißt auch 
Zahlen, die größer als 664 sind, 
obwohl die Diskette nur 664 
Blocks zur Verfügung stellt. Die 
Zahl hat nur eine optische Funk- 
tion innerhalb des Directory. Eine 
Anderung wirkt sich also nicht auf 
das File aus. 

3) Filetyp ändern: Zulässig sind 
alle möglichen Filetypen, also 
auch „DEL“. 

4) Anfangsblock ändern: Es kann 
jede sinnvolle Track-Sektor-Kom- 
bination eingegeben werden. 
INST: An der durch den Pfeil ge- 
kennzeichneten Stelle wird ein 
File eingefügt. Alle weiteren Files 
werden nach hinten verschoben, 
der letzte Eintrag wird entfernt. 
DEL: Das durch den Pfeil gekenn- 
zeichnete File wird aus dem Di- 
rectory entfernt. Alle weiteren Fi- 
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“ dem 


les werden um eine Stelle nach 
vorne gerückt. 

U-nscratch: Das durch den Pfeil 
gekennzeichnete File wird vor 
Löschen durch den 
„Scratch“-Befehl geschützt. Im Di- 
rectory erscheint ein Pfeil hinter 
dem Filetyp. 

F-reigeben: Ein gesehen File 
wird wieder freigegeben. Siehe 
auch 'U’. 

T: Die genaue Speicherlage des 
Files im C64 wird ausgerechnet 
und dezimal im Feld „Speicherla- 
ge" der Befehlszone ausgegeben. 
t: Rücksprung in den Befehlsmo- 
dus. 


BAM Edit 
SEE 


Die BAM ist der Blockbelegungs- 
plan der Diskette. In ihr ist jeder 
der 664 Blocks als belegt oder als 
frei gekennzeichnet. Änderungen 
werden vom DOS nur dann vorge- 
nommen, wenn ein File gespei- 
chert oder gelöscht wird. Nicht 
aktualisiert wird die BAM, wenn 
Daten im Direktzugriff (Block- 
Write) auf die Diskette geschrie- 
ben werden, 

Nach der Anwahl im Hauptmenü 
erscheint auf dem Bildschirm eine 
Art Koordinatenkreuz. Die obere 
Achse wird durch die Sektoren, 
die linke durch die Tracks 1—18 
dargestellt. Durch den Schnitt- 
punkt eines Tracks und Sektors im 
Koordinatenkreuz wird jeweils ein 
Block der Diskette charakteri- 
siert. Die gesamte BAM kann nicht 
gleichzeitig auf dem Bildschirm 
dargestellt werden. Deshalb wer- 
den wechselweise entweder die 
Tracks 1—18 oder 19-35 ange- 
zeigt. Jeder Diskettenblock wird 
im Koordinatenkreuz entweder 
durch einen Stern oder einen 
Punkt dargestellt. Ein Stern be- 
deutet, daß dieser Block als frei 
gekennzeichnet ist, ein Punkt sym- 
bolisiert einen als belegt gekenn- 
zeichneten Block. Die Verteilung 
freie — belegte Blöcke kann man 
am rechten Bildschirmrand able- 
sen. Dort werden die Zahlen beim 
Ändern sofort aktualisiert. Eine 
Sonderstellung nimmt Track 18 


‚ein: Er nimmt das Directory auf 


und steht zur Datenspeicherung®$ 
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nicht zur Verfügung. Seine 19 
Blocks sind deshalb nicht in der 
Blockzahl der Diskette (664) ent- 
halten. Wird der Status eines 
Blocks des Tracks 18 geändert, ist 
dies unerheblich: Die Blockanzei- 
ge wird dadurch nicht beeinflußt. 
a) Befehlsmodus: g! 
A-endern: Sprung in den Ände- 
rungsmodus. Befehle siehe unten. 
H-ardcopy: Druckt eine Bild- 
schirmcopy. Ist kein Drucker an- 
‚ geschlossen, wird der Befehl 
ignoriert, 

R-ead: Die BAM wird nochmals 
eingelesen. Dies ist wichtig, wenn 
man sich beim Ändern geirrt hat 
und von vorn beginnen möchte. 
S-kip: Die dargestellte Bam-Hälfte 
wird gewechselt. Es werden ent- 
weder die Tracks 1—18 oder 
19—35 ausgegeben. = 
W-rite: Die BAM wird mit den Än- 
derungen auf Diskette zurückge- 
schrieben. 

t: Rücksprung in das Hauptmenü. 
Achtung: Änderungen werden 
nicht berücksichtigt, wenn nicht 
der W-Befehl verwendet wurde. 
b) Änderungsmodus: 2 
Nach dem Sprung in den Ände- 
rungsmodus (A) erscheint ein Cur- 
sor. Er kann mit den Cursor-Ta- 
sten auf jeden Block bewegt wer- 
den. Ist das Ende einer BAM-Hälf- 
te erreicht, wird automatisch die 
nächste dargestellt. Alle Befehle 
beziehen sich auf den Block bezie- 
hungsweise Track, auf dem sich 
der Cursor befindet. 

*: Block als frei kennzeichnen. 
„Block als belegt kennzeichnen. 
B-elegen: Den Track, in dem sich 
der Cursor befindet, als belegt 
kennzeichnen. 

F-reigeben: Den Track, in dem 
sich der Cursor befindet, als frei 
kennzeichnen. 

t. Rücksprung in den Befehlsmo- 
dus. 


Puffer Edit 
EEE 


Die Puffer haben neben der Auf- 
gabe, als Verbindung zwischen 
Diskette und Rechner den Daten- 
transfer durchzuführen, noch eine 
zweite Funktion: Man kann eigene 
Maschinenprogramme in sie hin- 
einschreiben und diese in der 
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Floppy ablaufen lassen. Dies ist 
die einzige Möglichkeit, selbst die 
Kontrolle über die Floppy zu über- 
nehmen und das DOS „auszublen- 
den‘, da dies im ROM steht und 


nicht veränderbar ist. So kann 
man beispielsweise die Spuren 
36—40 nutzen oder den Zwischen- 
raum zwischen zwei Sektoren mit 
Daten beschreiben. Sogar eine 
völlig neue Formatierung der Dis- 
kette ist möglich. 

Mit Floppymaster kann man auf 
die fünf Floppy-Puffer zugreifen. 
Der Bildschirmaufbau entspricht 
dem des Programmteils „Sekto- 
ren Edit". Die Felder „Sektor" und 
„Input-Sektor“ wurden durch 
„Puffer“ und „Input-Puffer" er- 
setzt. Im Feld „Input-Puffer" wird 
immer die unmittelbar folgende 
Puffernummer angezeigt. 

a) Befehlsmodus: 
A-endern: Sprung in den Ände- 
rungsmodus, Befehle siehe unten. 
C-opy: Puffer kopieren. Neben 
dem Pufferfeld erscheint „kopiere 
nach:“. Hier wird der Puffer fest- 


gelegt, in den der aktuelle Puffer 


kopiert wird. 

E-xecute: Maschinenprogramm in 
der Floppy starten. Das Maschi- 
nenprogramm, das am Anfang 
des aktuelles Puffers beginnen 
und mit einem RTS enden muß, 
wird gestartet. 

H-ardcopy: Druckt eine Bild- 
schirmhardcopy. Ist kein Drucker 
angeschlossen, wird der Befehl 
ignoriert. 

R-ead: Der angezeigte Puffer wird 
nochmals eingelesen. Dies ist 
wichtig, wenn man sich beim An- 
dern von Bytes geirrt hat und von 
vorn beginnen möchte. 

S-kip: Die angezeigte Blockhälfte 
wird gewechselt. 

V-orwärts: Der unmittelbar näch- 
ste Puffer wird gelesen und aus- 
gegeben. Wenn Puffer 4 erreicht 
wurde, wird mit Puffer 0 fortgefah- 
ren. 

W-rite: Der aktuelle Puffer wird 
zurückgeschrieben. 

Z-urück: Der unmittelbar vorher- 
gehende Puffer wird eingelesen 
und angezeigt. Ist Puffer 0 er- 
reicht, wird mit Puffer 4 fortgefah- 
ren. 

t: Rücksprung in das Hauptmenü. 
Achtung: Der Puffer wird nicht zu- 
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rückgeschrieben, alle Änderun- 
gen werden daher nicht berück- 
sichtigt. 

#: Auf dezimale Ausgabe um- 
schalten (Voreinstellung!) 

$: Auf hexadezimale Ausgabe um- 
schalten. : 

0—4: Im Input-Puffer-Feld Puffer 
festlegen, der eingelesen werden 
soll. 

b) Änderungsmodus: 

Das erste Byte der Datenzone er- 
scheint revers. Mit den Cursorta- 
sten kann dieses Feld über den 
Bildschirm bewegt werden. Ist 
das Ende einer Pufferhälfte er- 
reicht, wird automatisch auf die 
andere Hälfte umgeschaltet. Alle 
Eingaben beziehen sich auf das 
Byte, das revers unterlegt ist. 
INST: An der Cursorposition ein 
Nullbyte einfügen. Alle weiteren 
Bytes werden um eine Position 
nach rechts verschoben. Das letz- 
te Byte des Puffers wird herausge- 
schoben. 

DEL: Das vor dem Cursor stehen- 
de Byte löschen. Alle folgenden 
Bytes werden um eine Position 
nach links verschoben, am Ende 
des Puffers ein Nullbyte einge- 
fügt. 

Z-ero: Alle Bytes ab Cursor-Posi- 
tion mit dem Wert Null belegen. 
#: Auf dezimale Eingabe um- 
schalten (Voreinstellung!) 

$: Auf hexadezimale Eingabe um- 
schalten. 

*: Auf ASCII-Eingabe umschalten. 
Man kann jetzt wie auf einer 
Schreibmaschine eingeben. 

t; Rücksprung in den Befehlsmo- - 
dus. 


DOS Edit 
En 


Die Floppy 1541 ist im Gegensatz 
zum C64 nicht mit 64 KByte Spei- 
cher ausgestattet. Sie besitzt einen 
RAM-Speicher von 0—2047 
($0000—$07FF) und einen ROM- 
Speicher von 49152—65535 
($C000--$FFFF), das DOS. Da das 
DOS im ROM gespeichert ist, 
kann män dort keine Änderungen 
vornehmen. Es ist aber möglich, 
Teile des DOS in das RAM zu ko- 
pieren, dort abzuändern und als 
eigene Routine in der Floppy aus- 
zuführen. Das Floppy-RAM enthält 


- viele wichtige Parameter für das 
DOS, die ohne weiteres manipu- 
liert werden können, wie etwa Ge- 
räteadressen. 

Die Floppy 1541 enthält außer 
dem RAM und ROM noch zwei 
Ein-/Ausgabe-Bausteine VIA 

6522, die den seriellen Bus und 
die Schreib-Lesekopf-Steuerung 
übernehmen. Der Adreßbus liegt 
von: 6144-6159 ($1800—$180F) 
bzw. von 7168-7183 
($1C00-—$1C0F). Da diese Ports 
rein softwaremäßig keine Bedeu- 
tung haben, kann von Floppyma- 
ster nicht auf sie zugegriffen wer- 
den. 

Im ROM-Bereich können keine 
Änderungen vorgenommen wer- 
den. Es ist deshalb die eine oder 
andere Taste gesperrt, die im 
RAM durchaus eine sinnvolle 
Funktion erfüllt. 

a) Befehlsmodus: 
A-endern: Sprung in den Ände- 
rungsmodus, Befehle siehe unten. 
Dieser Befehl hat im ROM-Bereich 
keine Wirkung. 

C-opy: Adreßbereich kopieren. 
Neben dem Adreßfeld erscheint 
„kopiere nach:". Hier wird die An- 
fangsadresse des Bereichs festge- 
legt, in den der angezeigte Adreß- 
bereich kopiert wird. 

E-xecute: Maschinenprogramm in 
der Floppy starten. Das Maschi- 
nenprogramm, das am Anfang 
des aktuellen Adreßbereichs be- 
ginnen und mit dem RTS abge- 
schlossen sein muß, wird gestar- 
tet, 

H-ardcopy: Druckt eine Bild- 
schirmhardcopy. Ist kein Drucker 
angeschlossen, wird der Befehl 
ignoriert. 

R-ead: Der angezeigte Adreßbe- 
reich wird nochmals eingelesen. 
Dies ist wichtig, wenn man sich 
beim Ändern von Bytes geirrt hat 
und von vorn beginnen möchte. 
S-kip: Die angezeigte Blockhälfte 
wird gewechselt. 

V-orwärts: Der unmittelbar hinter 
dem aktuellen Bereich liegende 

Adreßbereich wird gelesen und 
ausgegeben (+256 Byte). Ist das 
Ende des ROMs erreicht, wird am 
Anfang des RAMs fortgesetzt. 
W-rite: Der aktuelle Adreßbe- 
reich wird ins RAM zurückge- 
schrieben. Der Write-Befehl hat 


Floppy 


im ROM keine Wirkung. 

Z-urück: Der unmittelbar vor dem 
aktuellen Bereich liegende 
Adreßbereich wird gelesen und 
ausgegeben (-256 Byte). Ist der 
Anfang des RAMs erreicht, wird 
am Ende des ROMs fortgefahren 
t: Rücksprung in das Hauptmenü. 
Achtung: Der Bereich wird nicht 
zurückgeschrieben, alle 'Ände- 
rungen werden daher nicht be- 
rücksichtigt. 

#: Auf dezimale Ausgabe um- 
schalten (Voreinstellung!) 

$: Auf hexadezimale Ausgabe um- 
schalten. 

0—9: Im Input-Adreßfeld Anfangs- 
adresse des Bereichs festlegen, 
der. eingelesen werden soll. Er- 
laubt sind Eingaben von 0 bis 1792 
und von 49152 bis 65280. 

b) Änderungsmodus: 

Das erste Byte der Datenzone er- 
scheint revers. Mit den Cursorta- 
sten kann dieses Feld über den 
Bildschirm ‘bewegt werden. Ist 
das Ende einer Bereichshälfte er- 
reicht, wird automatisch auf die 
andere Hälfte umgeschaltet. Alle 
Eingaben beziehen sich auf das 
Byte, das revers unterlegt ist. 
INST: An der Cursorposition ein 
Nullbyte einfügen. Alle weiteren 
Bytes werden um eine Position 
nach rechts verschoben. Das letz- 
te Byte des Blocks wird herausge- 
schoben. 

DEL: Das vor dem Cursor stehen- 
de Byte löschen. Alle folgenden 
Bytes werden um eine Position 
nach links verschoben, am Ende 
des Blocks ein Nullbyte eingefügt. 
Z-ero: Alle Bytes ab der Cursor- 
Position werden mit dem Wert 
Null belegt. 

#: Auf dezimale Eingabe um- 
schalten (Voreinstellung!) 

$: Auf hexadezimale Eingabe um- 
schalten. 

“: Auf ASCII-Eingabe umschalten. 
Man kann jetzt beliebige Texte 
wie auf einer Schreibmaschine 
eingeben. 

t: Rücksprung in den Befehlsmo- 
dus. 

Hinweis: Schreibt man in den 
Floppy-Stack, der sich von 
256—325 ($0100—$0145) befindet, 
führt das unweigerlich zum Ab- 
sturz der Floppy und von Floppy- 
master. 
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Tracks Edit 
SEEEEE 


Dieser Programmteil dient nicht 
zum Ändern von Bytes, sondern 
vermittelt einen Gesamtüberblick 
über die Diskette. Nachdem der 
Track gelesen wurde, werden in 
der Datenzone die jeweils ersten 
sechs Bytes der ersten 16 Sekto- 
ren des Tracks aufgelistet, weil 
die wichtigsten Informationen, wie 
logischer Folgeblock und Start- 
adresse, in den ersten Bytes ent- 
halten sind. Außerdem erkennt 
man einen Block am ehesten an 
seinen ersten Bytes. Sucht man ei- 
nen bestimmten Block, kommt 
man mit „Track Edit“ schneller 
ans Ziel, als wenn man: jeden 
Block einzeln einliest. Darüber 
hinaus erkennt man, welche Blök- 
ke unbeschrieben sind und damit 
noch Daten aufnehmen können. 
Nach Anwahl vom Hauptmenü 
sieht man die noch leere Datenzo- 
ne. In der Editzone befindet sich 
nur ein Eingabebefehl, „Track-In- 
put“, in dem der Track festgelegt 
wird, der gelesen werden soll. Mit 
den Tasten Cursor-Up und Cur- 
sor-Down scrollt man durch die 
Anzeige, da nicht alle Sektoren 
gleichzeitig in der Datenzone Platz 
finden. An der linken Bildschirm- 
seite stehen die Nummern der 
Sektoren, die augenblicklich in 
der Datenzone zu sehen sind. Tritt 
beim Einlesen eines Tracks ein 
Lesefehler auf, wird der Lesevor- 
gang nicht abgebrochen. Viel- 
mehr muß die Fehlermeldung mit 
einem Tastendruck quittiert wer- 
den. Anschließend wird der Lese- 
vorgang fortgesetzt. 
Folgendermaßen kann dann eine 
Diskettenreparatur durchgeführt 
werden: 

— Track lesen, auf dem sich der 
nichtlesbare Block befindet. Der 
unlesbare Block wird rechner- 
intern wie ein Block mit 255 Null- 
Bytes behandelt. 

— Track formatieren (F),. 

— Daten zurückschreiben (W). 
Der unlesbare Block ist in einen 
lesbaren Null-Block umgewandelt 
worden. 

C-opy: Track kopieren. Neben 
dem Track-Feld erscheint „kopie- 


re nach:“. Hier wird der Track ein-» 
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gegeben, in den der aktuelle 
Track kopiert wird. 

F-ormat: Formatiert den angezeig- 
ten Track. 

H-ardcopy: Druckt eine Bild- 
schirmhardcopy. Ist kein Drucker 
angeschlossen, :wird der Befehl 
ignoriert. 

V-orwärts: Der unmittelbar näch- 
ste Track wird gelesen und ausge- 
geben. Wenn das Ende der Dis- 
kette erreicht wurde, wird mit 
Track 1 fortgefahren. 

W-rite: Der aktuelle Track wird 
auf Diskette zurückgeschrieben. 
Z-urück: Der unmittelbar vorher- 
gehende Track wird eingelesen 
und angezeigt. Ist der Anfang der 
Diskette erreicht, wird mit Track 
35 fortgefahren. 

t; Rücksprung in das Hauptmenü. 
Achtung: Der Track wird nicht zu- 
rückgeschrieben. Wenn der 
Track mit dem „F“-Befehl forma- 
tiert wurde, gehen die Daten ver- 
loren. 

#: Auf dezimale Ausgabe um- 
schalten (Voreinstellung!) 

$: Aufhexadezimale Ausgabe um- 
schalten. 

1—9: Im Input-Track-Feld Track 
festlegen, der eingelesen werden 
soll. Es sind Zahlen von 1 bis 35 er- 
laubt. 


. Befehl senden 
BEE 


In diesem Programmteil kann je- 
der beliebige Befehl mit einer 
Länge von maximal 38 Zeichen an 
die Floppy gesandt werden. Ne- 
. ben den Standard-Befehlen aus 
dem Floppy-Handbuch (N, S, C,R, 
V, D können auch die User-Befeh- 
le verwendet werden: 

„UC"/,U3" startet ein Maschinen- 
programm ab Adresse $0500 (Puf- 
fer 2, Byte 0). 

„UD"/,U4" startet ein Maschinen- 
programm ab Adresse $0503 (Puf- 
fer 2, Byte 3). 

„UE"/,U5" startet ein Maschinen- 
programm ab Adresse $0506 (Puf- 
fer 2, Byte 6). 

„UF"/,U6" startet ein Maschinen- 
programm ab Adresse $0509 (Puf- 
fer 2, Byte 9). 

„UG"/,U7" startet ein Maschinen- 
" programm ab Adresse $050C (Puf- 
fer 2, Byte 12). 


„UH"/,U8" startet ein Maschinen- 
programm ab Adresse $050F (Puf- 
fer 2, Byte 15). 

Mit Floppymaster hat man also die 
Möglichkeit, eigene Maschinen- 
programme in die Puffer zu schrei- 
ben und am Anfang des Puffers 2 
eine Sprungtabelle aufzubauen. 
Die Maschinenprogramme kön- 
nen ausgeführt werden, ohne daß 
Floppymaster verlassen wird. An 
die Befehle können Parameter an- 
gehängt werden. Man kann Ma- 
schinenprogramme in der Floppy 
zum Beispiel mit „U4 Wertl und 
Wert2" starten. Dazu muß man 
wissen, daß der Befehlsstring im 
Floppy-RAM ab der Adresse 
$0200 abgelegt wird. Dort kann 
man die Information auslesen, die 
hier mit Wertl und Wert2 bezeich- 


.net wurde. 


Zwei User-Befehle haben eine 
Sonderfunktion: 

„Ul'/,U9“ startet ein Maschinen- 
programm, dessen Anfangsadres- 
se im Floppy-RAM in den Spei- 
cherstellen $0065 (Low-Byte) und 
$0066 (High-Byte) gespeichert ist. 
„UJ‘/,U:" springt zum Reset-Vek- 
tor der Floppy ($EAA0). Man er- 
hält die (Fehler-)Meldung 
„18,CBM DOS V2.6 1541,00,00". 


lnitialisieren 
EZ 


Wenn ein Diskettenwechsel vor- 
genommen wurde, sollte man die 
neue Diskette zuerst initialisieren. 
Floppymaster prüft aus Sicher- 
heitsgründen vor jedem Sprung in 
einen Edit-Programmteil, ob die 


‚auf der Diskette gespeicherte 


BAM mit der im Floppyspeicher 
befindlichen übereinstimmt. Ist 
dies nicht der Fall, wird die Feh- 
lermeldung „ID Mismatch" ausge- 
geben. 


Weitere Befehle 
GEBE 


Directory. Das Directory wird in 
der gewohnten Form auf dem 


Bildschirm ausgegeben. Ist dieser 


gefüllt, wird mit der weiteren Aus- 
gabe gewartet, bis die Return-Ta- 
ste gedrückt wird. 

Geräteadresse ändern. Floppy- 
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master setzt bei allen Floppyope- 
rationen als Geräteadresse eine 8 
voraus. Wenn die verwendete 
Floppy eine andere Geräteadres- 
se besitzt, muß sie in diesem Pro- 
grammteil softwaremäßig in eine 8 
umgewandelt werden. 

Farben wählen. Mit den Tasten 
Fl, F3 und F5 erstellt man eine 
Bildschirmfarbkombination nach 
Wahl. F7 bewirkt den Rücksprung 
ins Hauptmenü. 

Programm beenden. Floppyma- 
ster wird gelöscht und ein Reset 
ausgelöst. 


Anwendungsbeispiel 


„E-Befehl 
Be 


Der ungewöhnlichste Befehl von 
Floppymaster ist der „E'-Befehl, 
ımit dem man eigene Maschinen- 
programme in der Floppy ablau- 
fen lassen kann. Daher sei an die- 
ser Stelle ein kleines Beispiel dar- 
gestellt, das erahnen läßt, wie vie- 
le Möglichkeiten dieser Befehl 
eröffnet. Es soll einen READ ER- 
ROR 23 auf der Diskette erzeugen, 
genauer gesagt, auf Sektor 10 des 
35. Tracks. Dieser in der Realität 
kaum auftretende Error wurde 
einst als Kopierschutz verwendet. 
Es handelt sich um einen Prüfsum- 
menfehler. Die Prüfsumme am 
Ende des Datenblocks stimmt 
nicht mit dem tatsächlichen Inhalt 
des Blocks überein. Um einen sol- 
chen Error zu erzeugen, muß man 
nur falsche Daten in den Block 
hineinschreiben. Mit den norma- 
len Befehlen freilich funktioniert 
das nicht, weil das DOS automa- 
tisch immer die Prüfsumme aktua- 
lisiert. Daher muß der Schreibvor- 


gang mit einem eigenen Maschi-. 


nenprogramm vollzogen werden. 
Im Hauptmenü von Floppymaster 
wird der Programmpunkt „Puffer 
Edit“ angewählt und mit dem „A'- 
Befehl in den Änderungsmodus 
gegangen. Dort löscht man am be- 
sten den Puffer zunächst mit dem 
„Z"-Befehl und tippt dann die fol- 
genden Daten im Dezimal-Ein- 
gabemodus ein: 
76,65,3,165,18,133,22,165,19,133, 
23,169,35,133,24,169,10,133,25,32, 
39,245,32,86,245,162,0,202,208,253, 


173,12,28,41,31,9,192,141,12,28,169, 
255,141,3,28,169,85,141,1,28,80,80, 
254, 184,80,254,184,80,254,184,32,0, 
254,76,158,253,169,234,141,0,3,141, 
1,3,141,2,3,169,35,133,6,169,10,133, 
7,169,224,133,0,165,0,48,252,96 
Nun den Änderungsmodus verlas- 
sen und die Daten mit dem „W"- 
Befehl in den Puffer schreiben. 
Danach kann man das Maschinen- 
programm mit dem „E“-Befehl 
starten. Die Floppy läuft kurz an, 
und es wird (hoffentlich) die Mel- 
dung „00,OK,00,00" ausgegeben. 
Den Erfolg dieser Prozedur er- 
kennt man, wenn man versucht, 
den Block 35 10 im Programmteil 
„Sektor Edit“ einzulesen: Die ge- 
wünschte Fehlermeldung 
129,READ -ERROR,35,10" er- 
scheint, der Block ist unlesbar ge- 
worden. 

Hier eine Auflistung der benutzten 


Betriebssystem-Routinen des 
Floppy-DOS in diesem Maschi- 
nenprogramm: 


JSR $F527: Blockheader holen 

]SR $F556: SYNC abwarten 

JSR $FEOO: Umschalten auf Lesen 
JSR $FDYE: Sprung in die Job- 
schleife 

Floppymaster schreibt selbst kei- 
ne .Maschinenroutinen in die 
Floppy. Man kann also eigene 
Routinen ohne Einschränkung im 
Floppy-RAM editieren und auste- 
sten. 


POKE 55,25:POKE s5, ‚113: ELR 


C$="KOPIERE NACH: 


SC-36B64 : M0=37568: P5S=-39157 


BL-=38103: PR-38346 


Der Betrieb zusammen mit Speed- 
dos ist möglich. Floppymaster 
stellt dann Geschwindigkeitsre- 
korde auf. 

Eine abschließende Warnung: 
Um den Umgang mit dem Pro- 
gramm zu erlernen, sollte man un- 
bedingt eine Übungsdiskette ver- 
wenden! 


Hexdump-Basiclader 


in zwei Teilen 
BE METER SER ESE 


Floppymaster besteht aus einem 
Basicteil (Listing 1) und einem Ma- 
schinenspracheteil. Der Maschi- 
nenspracheteil ist als kombinier- 
ter Hexdump-Basiclader abge- 
druckt. Wie man mit dieser Art 
von Listing umgeht, steht auf Seite 
6. Wegen seiner Länge (12 K) ist 
der Maschinenspracheteil in zwei 
Teilen abgedruckt (Listing 2 und 
3). Wird er als Hexdump eingege- 
ben, so muß der Checker verwen- 
det werden. Als Startadresse ist 
711B anzugeben. Die Trennung 
des Hexdumps in zwei Teile ist für 
den Checker bedeutungslos; bei- 
de müssen beim Eintippen nahtlos 
aneinandergehängt werden. 

Wird das Programm als Basicla- 
der eingegeben, so muß folgende 
Prozedur genau beachtet werden: 


PRINT 


l) Listing 2 abtippen und abspei- 
chern 

2) Listing 3 abtippen und abspei- 
chern 

3) Das Basic-Speicherende mit 
POKE 55,0:POKE 56,113:CLR her- 
untersetzen 

4) Das Programm in Listing 2 laden 
und mit RUN starten 

5) Dasselbe mit dem Programm in 
Listing 3 

Das Maschinenprogramm steht 
nun fertig im Speicher und kann 
mit 

POKE 43,27 : POKE 44,113 

POKE 45,0 : POKE 46,160 

SAVE "(Maschinenteil)",8 

auf Diskette abgespeichert wer- 
den. 

Anschließend wird der Rechner 
mit SYS 64738 wieder in den Ein- 
schaltzustand versetzt. ; 
Floppymaster läßt sich nun folgen- 
dermaßen in Betrieb setzen: 
LOAD "(Maschinenteil)" 8,1 

NEW 

LOAD “(Basicteil)" ‚8 

RUN 

Auf der RUN-O-THEK-Diskette 
befindet sich neben der Normal- 
version auch eine kompilierte 
Version von Floppymaster., Sie 


bietet gegenüber der abgedruck- 


ten Fassung eine weitere Ge-. 


schwindigkeitssteigerung bei vie- 
len Funktionen. 
(Frank Riemenschneider) Eummsmuu 


FERVSISPAFTEL OPER Yo ASCT 
E RL2SPACESI3 . 


3 **»»[OFFJ"; 


GOSUB 4638: PRINT ”"ERUS,4BSPACES,DFF]J 


IN=-40413: FE=38551 

M3=38659: PL-39095: BuU-32768 

DIM 2613), F$C12),TRC16),SEC16),NC4), 
V(35),50(12):201)-18:50c1)-3 

FOR I=2 TO 6:2C1)=2C1-1)+2:S0C1)=3: 
NEXT I:FOR I=7 TO 12:2C1)=2C1-6): 
SOCII=20:NEXT I 

FSC1)="SEKTOREN”:; FSC2)="DIREKTORY”: 
FSC3)="BAM”:FSCH)I="PUFFER”:FS(C5)=- 

”» DOS » 
FSC6)="TRACKS”:F$C12)="PROGRAMMENDE” 
FSCB)="BEFEHL SENDEN”: FSC9)= 
"DIREKTORY ZEIGEN”:F$(7)= 
"INITIALISIEREN” 

FSC10)=-"GERAETEADR. AENDERN” 
FSC11)="FARBEN WAEHLEN”:SO=-298:FOR I= 
1 IO 6:FSCI)=FSC1)+” EDIT”:NEXT I 
SYS 31388 

BOR 121210335 

VCT)=20:IF T>17 THEN UCT)=18: IF T> 
24 THEN UCT)=17:IF T>38 IHEN VCT)=16 
NEXT T 

GOSUB 199:60T0 260 

FG=8:HQ=1:G0SUB 4608:PRINT ”CLCLR, 
RUS , 4OSPACES, OFF”; 
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PRINT "LRUS,BSPACESIFUER: C-64 & 
FLOPPY 1S41L8SPACES,OFFJ”; 
PRINT "LRUS, 393SPACES ,OFFJ"”; 
PRINT "LRUS,SSPACESICC) 1985 : 
RIEMENSCHNEIDERL2SPACES, OFF”; 
PRINT "LRUS,42SPACES,OFFJ”; : RETURN 
FOR I=1 TO 12:5Y5S PR,SOCI),2CI), 
FSCI):NEXT I 

I=1:SYS PR,SOCI),ZCI), "LRUSI”;FSC1); 
»LOFFI” 

POKE 198,0:WAIT 198,255:GET A$ 

IF AS<>"LDOWNI” THEN 320 

SYS PR,SOCI),2CI),FSCI):I=I+1:IF I> 
12 THEN I=1 

SYS PR,SOCIY,ZCI), "LRUSI” 
LOFFI”:GOTO 288 

IF AS<>"LUP2” THEN -350 
SYS PR,SQCI),ZCI),FSCI):I=I-1:IF I< 
1 THEN I=12 

SYS PR,SOCIJ,ZCI),"LRUSI”;FSCI);” 
LOFFI”:G0TO 288 

IF AS<>"LRIGHTI” THEN 388 


FRANK 


SESETIZR 


SYS PR,SOCI2,2C1),FSC1I):I=I+6: IF I> 
12 THEN I=I-12 
SYS PR,S0C1),2C1), 


SERUSIFZESCHI, 
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> 


388 
3908 


408 


410 
420 


438 


440 


450 
4608 


470 
489 
4990 
soD 
510 
520 
538 
542 
558 
568 
578 
588 


598 
6009 


618 
620 
630 
640 
650 
668 
670 


6808 
632 
790 
7ı08 
728 
738 
748 
758 


768 


778 
788 
790 
880 
810 


820 
830 


840 


850 


869 
870 
880 
8908 


308 


918 


9208 
338 
940 
358 
968 


9378 


LOFF2":60T0O 288 

IF AS<>"LCLEFTI3” THEN 41® 

SYS PR,SQC1),2C1),F$C1):1=I-6: IF I< 
1 THEN I=I+12 

SYS PR,SOCI),ZCI), 
LOFF]2":60T0 288 
IF AS<>CHRS (13) THEN 280 

ON I GOTO 4398, 1549, 2620,3730,3292, 
2190, 2580,4180,4240,4270,2180, 4550 
T1-18:51=08:5=-9:1T-8:POKE 53265,11:SYS 
37668:605UB 1420:POKE 53265,27 

IF A<>® AND FG=® THEN POKE 198,2: 
WAIT 198,255:60TD 188 

FG-1 

SYS 29610:AS=CHRS (C PEEK (147)): IF 
AS="H". THEN SYS 34442:60T0 468 

IF AS<>"N” THEN 5108 
T1=TN:S1=SN 

GOSUB 1420 

GOTD 4568 

IF AS<>"R” THEN 538 
S1-S:T1-T:G60SUB 14290:60T0 45608 
IF AS<>”"#” THEN 550 

SYS 31388:60T0 578 

IF AS{>”5”" THEN 598 

SYSFFL34HT 

GOSUB 5828:60T0 468 

POKE 781,2:5YS 36878: B2=PEEK 
2):5SYS 31419, B2:RETURN 

IF AS<>"F” THEN 628 

2 28955,T,5:1IF PEEK (254)<>0 THEN 
[214] 

T1=PEEK (178):S1-PEEK 
IF AS<>”W” THEN 658 
SYS-BE;05T,9:9YS-FE 

GOTO 4608 

IF. A$<>”"C” THEN 638 
SYSZPR:17.0,2$ 

H=T:H1=5:605SUB 4378: T$5="INPUT- 

SEKTIOR"”:SYS PR,17,0,1$:SYS BL,2,T1, 

Ssı 

SYS FE:bUIU 468 

IF A$S<>”"L” THEN 738 

SYS. 29258:IF PEEK (254)=8 THEN 468 

T1=PEEK (258):S1=-PEEK (253) 

SYS BL,1,T1,51:G60SUB 1428:G0TO 458 
IF AS<>”S5” THEN 788 

G0OSUB 758:60T0 45608 

IF Z=B8 THEN 2=128:5YS 36B64,128:R$= 
”"128”:Bi-PEEK (53119)3:60T0 778 

2=-0:5Y5 36864,9:B$=-"L2SPACESID” 

PEEK (52991) 

SYS 31419,B1:5YS PR,3,1,B$: RETURN 
IF As<>"A” THEN 12568 

GOSUB 828:60T0 458 

B=-2:P=8:5YS MO,P,P 

GOSUB 4488:POKE 198,8:WAIT 198,255: 

GET BS$ 

IF BS<>"CRIGHTI” THEN B6B 

IF P<127 THEN B=B+1:P=-P+1:SYS MD,P- 

1,P:60T0 81® 

IF B=-127 THEN B=B+1:P=-9:5YS 36864, 

128:5YS MO,P,P:GOTO 818 

IF B=-255 THEN B=®:P=9:5YS 36864,0: 

syS MO,P,P:GOTO 818 

IF BS<>”#" THEN 888 

HQ=1:GOSUB 4630:G60TO 818 

IF BS<>"LCLEFT]2” THEN 922 

IF Pd THEN B=B-1:P=-P-1:5YS MO,P+1, 

P:GOTO 818 

IF B=128 THEN B=B-1:P=127:5YS 36864, 

0:5Y5 MDO,P,P:GOTO 818 

IF. B=-8 THEN B=255:P=127:5YS 36864, 
128:5YS MO,P,P:GOTO 818 

IF BS<>"$” THEN 942 

HQ-2:G0SUB 4600:60TD 818 

IF BS<>CHR$ (34) THEN 9568 

HQ=3:60SUB 4618:60TO 818 

IF BS<>"LUPJ” THEN 1008 


IF P>7 THEN B=B-B:P-P-8:5YS MD,P+8B, 


?ERUSIYSESCTI5* 


(52991+ 


£1793):60I0 7208 


sBr= 
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1381 
35934 


ESBF 


15BE 
5635 


6327 


2956 


551 
3632 


1427 
1619 
5935 
S5B6 
1436 
2158 
14396 
1439 
1321 
714 
922 
4653 


1431 
2678 


25593 
1511 
11982 

586 
1522 
19834 
5813 


979 
1311 
2613 
1563 
2136 
1524 

832 
5348 


3633 


1357 
1497 

874 
1241 
2832 


1373 
4416 


49039 
4071 


1516 
1589 
1397 
3688 


48393 
4672 


1311 
1594 
1608 
16083 
1373 
3438 


3808 
998 


10008 
1010 
10208 


1030 
19040 


1050 
1060 
1070 
10808 
1939 


1188 
1118 
1120 


1138 
1148 


1150 
1168 


1178 
1188 
1198 
1208 


1218 
12208 
1238 
1240 


1258 
1268 
1278 
1288 
1298 
1398 
131® 
1320 
1338 
1340 
1350 
1360 
1370 
1388 
1390 


1409 
1418 


1420 


1430 
1440 
1450 
1460 


1470 
14808 
1490 


1508 


1518. 


1528 
1530 


1548 


P:GOTO 810 
IF B<8 THEN B=B+248: P=120+P:SYS 
36864,128:5YS MO,P,P:GOTO 818 

IF B>7 THEN B-B-8:P=120+P:SYS 36864, 
0:5YS MO,P,P:GOTO 810 

IF BS$<>”2" IHEN 1030 

GOSUB 19820:60T0 810 

SYS 29224, P+2:5YS 36864,2:5YS MO,P, 
P: RETURN 

IF B$<>"CDOWNI” THEN 1078 

IF P<120 THEN B=B+8:P=P+8:5Y5 MO,P- 
8,P:GOTO 810 

IF B<200 THEN B=B+8:P=P-120:5YS 
36864,128:5YS MO,P,P:GOTO 818 

IF B>200 THEN B=B-24B:P=P-120:5Y5 
36864,0:5YS MO,P,P:G60TO 818 

IF BS<>CHRS (148) DR (P=127 AND 2= 
128) THEN 1098 

POKE 179,2:5Y5 37410, P+2:5YS MD,P,P: 
GOTO 8108 

IF BS<>CHRS (20) OR (P=® AND 2=0) 
THEN 1118 

POKE 179,2:5Y5 37447,P+2:60T0 890 
IF B$="t"” THEN 1258 

A=ASC (BS): IF A<Gl1 OR A>G4 OR (A>G2 
AND A<G3) THEN 818 
T$=B$+"[2SPACESI”:SYS PR,27,1,T8: 
POKE 631,29:POKE 198,1 

POKE 40880 ,48:POKE 49881,32:0N HQ ı 
G0TO 1159,1180,1238 

SyS IN,3,0,27,1,0 

GOSUB 4560:E=UAL (FS):IF E<B OR E> 
255 THEN 1150 

GOTO 1240 

SYS IN,2,1,27,1,0 

GOSUB 4570 

E=(C-48-CC AND 64)*9.109375)*16+CE- 
48-(CE AND 64)*9.109375) 

IF E<® OR E>2S5 IHEN 1188 

GOTO 1240 

E=ASC (B$) 

POKE 52991+2+P ,E:POKE 781,2:5Y5 
36878:60T0 839 

B-0:5YS 36864,9:60SUB 4489: RETURN 
IF A$<>”U” THEN 1320 

T1=T:51=S+1 

IF S1>VCT1) IHEN 1390 

GOSUB 1429:60T0 458 


T1=T1+1:S1=®:IF T1>35 THEN Tir1 
G60T0 1298 

IF A$<>"Z2” THEN 1378 
T1-T:51=S-1:IF 51>=® THEN 1369 
T1-T1-1:IF T1i<1 THEN T1-35 
S1-VCT1) 

G0SUB 14290:60T0 468 

IF AS<>”t" THEN 1390 

G0T0O 188 


IF CAS<CHRS (48) OR AS>CHRS (579) 
AND CAS<>CHRS (13)) THEN 460 
SH=-29: IF AS=CHRS (13) THEN SH=13 

SYS PR,32,0,A$:POKE 198,1:POKE 631, 
SH:GOSUB 4370:60SUB 1428:G60T0 460 
DPEN 2,8,2,”#":0PEN 1,8,15: PRINT#1, 
RBERIe 0”; Ti; sı 

CLOSE 2: CLOSE 1:60T0 1489 

SYS BL,1,71,51:SYS 35056 

SYS PR,8,0,11;51' 
T-T1:5=-S51:2=8:TN-PEEK (52931) :5N- 
PEEK (52992) 

POKE 53265,27: RETURN 

IF FG=8 THEN 1510 

SyS FE:IF PEEK C1112)<>48 THEN SYS 
35267:60T0 1478 

GOTO 1442 

OPEN 1,8,15: INPUT#1,A,B$,C,D:CLOSE 1 
IF A=-8 THEN 1440 

PRINT "ECLRI”:T$="FLOPPY: "+STRS CA)+ 
”» "+B5+”, ”+STRS CC)+”, "+STRS ,CDI: SYS 
PR,8,10,15:60I0 1478 

T1=PEEK (646): FR=1:5=1:P-48962: GOSUB 
P1208:1IF A<>® THEN POKE 198,0:WAIT 


1558 
1568 
1579 
1588 
1592 
16088 
1618 


1628 


1638 
1642 


1658 
16569 


1679 
1688 
1699 


1708 
1710 
1728 


1738 
1740 


1750 


1760 
1770 
1780 
1798 
1800 
1818 
1820 


1838 


1840 
1858 


1868 
1878 
18828 


18390 
1990 
191@ 
1928 


1938 


1948 
1958 
19608 
1378 
1989 
1998 
2008 


1 2010 


2020 
2038 
2040 
20250 


2068 
2079 


2088 
2039 


198, 255:G0TI0 180 

SYS 29615: AS-CHRS C PEEK (1479) 

IF A$<>”H” THEN 1588 

SYS 34442:6070 1550 

IF AS<>”R” THEN 1688 

G6DTO 1548 

IF AS<>”W” THEN 1688 

FOR I=® TO 4:NCIJ=PEEK (258+1):NEXT 
1:SYS 31856:FOR I=2 TOD 4:POKE 250+1, 
NCID:NEXT I 

OPEN 15,8,15: INPUT#15,A,BS,C,D:CLOSE 
15 

IF A=® THEN 2020 

TS="FLOPPY: "+STRS (A)+”, ”+BS+”, "+ 
STRS (C)+",”+SIRS (DJ:SYS PR,®,1,1$ 
POKE 198,0:WAIT 198,2S5:GET AS 
T$="SPEICHERLAGE : [2SSPACESI”:SyS 
PR,0,1,1$ 

SL-0:5H-192:SK-5:G601I0 1569 

IF AS$<>"A” THEN 1980 

POKE 158,SL:POKE 159,SH:POKE 155,5K: 
sys 32239 

SL-PEEK (158):SH=PEEK (159):SK=PEEK 
(155) 

IF PEEK (178)=128 THEN POKE 178,1: 
SYS 33511:60T0 2920 

Z=PEEK (155):P=256*PEEK (159)+PEEK 
(158) 

SYS IN,17,1,5,2,0:60T0 4658 

FOR I=1 TO LEN (F$):POKE P+4+1,ASC 
C MIDS CF$,1,19):NEXT I 

IF LEN CFS)<16 THEN FOR I=LEN CF$)+ 
1 TO 16:POKE P+4+1,ASC C CHRS 
C16O)):NEXT I 

Sys 33511 

SYS IN,3,0,24,2,0:60SUB 4560 

A=VAL (FS): IF AO OR A664 THEN 1770 
HB=INT (A/256):LB=A-HB*256 

POKE P+3@,LB:POKE P+31,HB 

SYS IN,3,1,29,2,0:G60SUB 4568 

IF F$="DEL” OR F$="REL” OR FS="PRG" 
OR FS="USR” OR F$="SEQ” THEN S1=®: 
GDTO 1850 

IF F$="DEL<” OR F$="REL<” OR F$= 
"PRG<” OR FS="USR<" OR FS="SEQ<” 
THEN S1=64:G0TD 1850 

GOTO 1810 

FS=LEFTS CF$,3): IF F$="DEL” THEN T1= 
128 OR S1:60T0 13908 

IF F$="SEQ” THEN T1=129 OR 51:60T0 
1900 

IF FS="PRG" THEN T1=13® OR S1:60T0 
1900 

IF F$="USR” THEN T1=131 OR S1:G0T0 
1300 

IF F$="REL” IHEN T1-132 OR S1 

POKE P+2,T1 

SYS IN,2,0,34,2,0:G60SUB 4569 

T1=VAL CF$): IF Ti<1 OR T1>35 THEN 
1910 

POKE P+3,T1:SYS IN,2,0,37,2,0:605UB 
4569 

SI1=-VUAL (FS) 

IF S1>UCT1) THEN 1938 

POKE P+4,S 

G0TD 18698 

IF AS<>"S" THEN 2900 

SYS 32036: 60T0 2020 

IF A$>”D” THEN 2038 

syS 31956 

SL=-9:5H=192:5K-5:60T0 1559 

IF A$<>”t” THEN 2052 

G0TO 188 

IF C ASC CASI<4B OR ASC (AS)>57) AND 
C ASC CAS)<>13) THEN 1559 

Ti=-29: IF AS-CHRS (13) THEN T1=13 
AS=AS+"L2SPACESI”:SYS PR,13,2,As: 
POKE 1398,1:POKE 631,T1 

SYS IN,3,0,13,0,13 

GOSUB 4568 


2188 
ell® 


2128 
2138 


2148 


2159 
2168 


2170 
2188 
2139 
2208 


2210 
22208 
2230 
2240 
2259 
22608 
2278 


‚2280 


2239 
2398 
2318 
23208 
2338 
2348 
2350 
2368 
2378 
2388 
2330 
2408 
2418 


2420 
2430 
2440 
2458 
[2 1214) 
2470 
2480 
2490 
2598 
2510 
2520 


2538 


2549 
2558 


2568 
2578 


2589 
2598 


2602 


2612 
26208 


2638 


2648 
2659 
2668 
2679 
2682 
25638 


2708 


WWW: HOMEZOMPUTERWOREB:- COM 


E=VAL (FS):IF E>128 DR E<1 TIHEN 2088 

POKE 170,E:P=4S128+E*32:SH=INT CP/ 

256):5L-P-256*5H:5YS 33511:SK-5:60T0 

1558 

POKE S3265,11:0PEN 1,8,2,”"$,P,R”: 

ELOSE 1 

DPEN 1,8,15: INPUT#1,A,B$,C, ‚D:CLOSE 

I= ER; A=0 THEN 2158 

PRINT "LELRI”:T5="FLOPPY:"+STRS (A)+ 

”."+BS+”,”+SIRS (C)+","+SIRS (DI:SYS 

PR,8,10,1$:G60ID 2168 

SYS 37379:5L-9:SH=192:5K-5 

POKE 646,T1:PRINT "L[LOFF]J”:POKE - 

53265,27: RETURN 

SYS PR,2,2,">":RETURN 

GOSUB 198:5YS 31582:G60TD 189 

SYS 29771:51=8 

SYS 293610:A$S=CHRS C PEEK (147)):5YS 

29851 

IF A$<>"H" THEN 2238 

syS 34442:60T0 2298 

IF A$<>”"F”" THEN 2250 

SYS 30599,T,1,V(CT2:60T0 2209 

IF AS<>"$” THEN 2270 

SYS 239654:SYS 30349,51:G60TO 2208 

IF AS<>"CDOWNI” THEN 23988 

Si-S1+1:IF S1>(CVCT)-15) THEN S1=-9 

SYS 30340,51:60T0 2208 

IF A$<>"LUPJ” THEN 2330 

Si1-S1-1:IF S1<® THEN S1=UCT)-15 

SYS 303498,51:60T0 22088 

IF A$<>"#" THEN 2350 

SYS 29675:5YS 30340,S1:60I0 2208 

IF AS<>"C” THEN 2420 

SYS PR,18,98,C$ 

SYS IN,2,8,32,0,13:G60SUB 4569 

T1=-VAL (CF$) 

IF UVCT1)<VCT) THEN 2379 

SYS 308293,2,11,VCT1)+1 

T$=" INPUT-TRACK: ":SYS PR,18,0,T$: 

G0TD 2208 

IF AS<>"W” THEN 2440 

SYS 30029,2,T,VCT)+1:60TO 2299 

IF A$S<>"Z” THEN 2470 

Ti=-T-1:1F Ti<1 THEN T1=35 

G60TO 2569 

IF A$<>"V" THEN 25008 

T1=-T+1:IF T1>35 THEN Ti=1 

G60TID0 2569 

IF A$<>”"t" THEN 2520 

G0T0O 189 

IE-C ASE CASI<4HB OR ASC CAS)>57) AND 
C ASC CAS)I<>13) THEN 2200 

FS=-"":POKE 198,1:5H=29: IF AS=-CHR$ 
(13) THEN SH=13 

POKE 631,5SH:5YS PR,32,0,A$ 

SYS IN,2,80,32,8,13:G60SUB Serena 
(FS): IF T1<1 OR T1>35 THEN 2550 

SyS 380823,1,T1,UCT1)+1 

IT=T1:5YS 30340,90:52=1:T$=SIR$ (T)+” 
”:5YS PR,6,8,T$:60I0 2208 

SYS PR,SOCI),ZCI),FSCI) 

OPEN 1,8,15:PRINT#1,”1”:1INPUT#1,A, 

BS,C,D:CLOSE 1:IF A=8 THEN 270 

PRINT "LELRI”:T$S="FLOPPY: ”"+STR$S (A)+ 
”,"+BS$S+","+SIRS (CE)+",”+SIRS (DI: ErS 

PR,0,10,1$ 

POKE 158, ®:WAIT 198,255:60T0 188 

2-2: G0SUB 3178:IF A<>@ THEN POKE 

198,8:WAIT 198,255:60TI0 188 

FG=1:5YS 23622:AS=-CHRS C PEEK 
(1473): 15="[4OSPACESI” 

SYS PR,0,0,1$:IF A$S<>”H” THEN 2668 

SYS 3444?2:6DT0O 2638 

IF A$<>”R” THEN 2688 

G0TO 2628 

IF A$<>”"S” THEN 2728 

IF Z=8 THEN Z2-128:5YS 32768,1: G0TO 

2718 

2=90:5Y5 32768,8 
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2718 
2720 
2730 


2748 


2750 
2760 
2770 
2780 
2730 
2800 
2810 
2820 
2830 
284D 
2858 
2860 
2878 
2882 
28390 
2900 
2310 
2320 
2930 
2348 
2958 
23960 
29370 
2982 


2998 
3908 
3218 
3028 
3038 
3949 
3058 
3050 
3878 
3088 


3938 
3108 


3118 
3128 
3138 
3148 
3158 
3168 
3170 


3188 
3198 


3208 
3210 


32208 
3238 


3240 
3258 


3268 
3278 


32808 
3238 


3390 


3318 


3328 
33398 


syS 36352:60I0 26398 

IF AS$<>”"W” THEN 2768 

SYS 32959:0PEN 1,8,15: INPUT#1,A,B$, 
C,D:CLOSE 1:IF A=® THEN 2630 
I$S="FLOPPY: "+STRS (A)+","+B$+”,”+ 
SIRS (C)+”,"+STR$ (D):SYS PR,0,0,T$ 


G0TD 2638 

IF A$<>”"A”" THEN 3150 
T-1:5=-0:1F 2=128 THEN T=19 
GOSUB 32308 


POKE 198,0:WAIT 198,255:GET BS 

IF BS<>"CRIGHTI” THEN 2862 

GOSUB 3259 

S=S+1:IF S>UCT) THEN T-T+1:5-® 

IF T=19 AND S-8 THEN GOSUB 3278 

IF T=-35 AND S-=® THEN GOSUB 3280: T=1 
GOSUB 3238:60T0 2799 

IF B$S<>"CLEFTI” THEN 2940 

GOSUB 3259:5-S-1 

IF S>=® THEN 2910 

T=-T-1:1F T<1 THEN T=3S 

S-UCT) 

IF T=-35 AND S=16 THEN GOSUB 3278 

IF T=-18 AND S-=18 THEN GOSUB 32808 
G0TD 2850 

IF B$S<>"LUPJI” 
GDSUB 3258 
T=T-1:IF I<1 THEN T-35 

IF T=-18 THEN G0SUB 3288 

IF T=35 THEN GOSUB 3278:2=128: IF 5> 
16 THEN S=16 
G60I0 2859 

IF BS<>”"CDOWNI” 
GOSUB 3258 
I-I*+1:IF T>35 THEN T=1 

IF S>UCT) THEN S=UCT) 

IF T=-19 THEN GOSUB 3278 

IF I=1 THEN GOSUB 3280 

G0TO 2859 

IF BS="tT” THEN 3149 

IF BS<>”*” AND BS<>”.” AND BS<>”"B” 
AND BS<>”F” THEN 2790 

IF BS="B” IHEN SYS 37273,T,46:6DT0 
3138 

IF B$="F” THEN SYS 37273,T,42:60T0 
3130 ; 

E-ASC (BS):SYS 32818, 1,5,E 

syS 36352:60T0 2828 

SYS 36352:60I0 30208 

GOSUB 32598:60T0 2638 

IF A$<{>"T” THEN 2630 

DPEN 1,8,15,”1”:CLOSE 1:60T0 182. 
POKE 53265,11:0PEN 2,8,2,”#":DPEN 1, 
8,15:PRINT#1,"B-R 2 8 18 2” 

CLOSE 2:CLOSE 1 

OPEN 1,8,15: INPUT#1,A,B$,C,D:CLOSE 
1:IF A=® THEN 3210 

PRINT "CCLRI":TS="FLOPPY: ”"+STR$S (A)+ 
”""+BS+”,"+SIRS CC)+”,”+STRS (D):SYS 
PR,0,10,1$:60T0 32208 

SyS 39682:5YS 36352 

POKE 53265,27: RETURN 
AA=1114+T*49+S: IF 2=128 THEN 
728 

POKE AA,PEEK (AA)+128: RETURN 
AA=1114+T*49+S: IF Z=128 THEN 
728 

POKE AA,PEEK CAA)-12B: RETURN 
SYS 33211:SYS BW,1:5YS 36352:2=128: 
RETURN 

SYS 33211:SYS BW,0:5YS 36352: 
RETURN 

AA=0:POKE 53265,11:5YS 39312: 6G0SUB 
3678:POKE 53265,27 - 
SYS 29610: A$=CHRS C PEEK (147): IF 
AS="H" THEN SYS 34442:60I0 3308 

IF AS<>"A”" OR (AS="A” AND AAR>1792) 
THEN 3338 

GOSUB 880:60T0 3398 

IF A$<>”"R” THEN 3358 

GOSUB 3678:6DTO 3388 


THEN 3908 


THEN 3079 


AA=AA- 


AA=AA- 


2-0: 
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1611 
1562 
4245 


5257 


603 
1339 
2249 

533 
2313 
1426 

615 
22er 
1958 
2105 
1154 
1446 
1353 
1340 
1536 

444 
2064 
19089 

633 
1377 

615 
1536 
1627 
3508 


633 
1491 

615 
1492 
1678 
1641 
1326 

633 
1634 
4101 


3816 
3128 
1693 
1611 
1596 
1157 
1472 
ee22l 
42eS1 


516 
3085 


5178 
1654 
1136 
3564 


1504 
3564 


1506 
3193 


3837 
4447 
3604 
2601 
1287 


1475 
1398 


3358 
33698 
3378 


3389 
3390 
3400 
3418 
3420 


3430 


3440 
3450 
34608 


3470 
3480 
3490 
3500 


3510 
3522 


3530 
3540 
3558 
3560 


3578 


3580 
3598 
35698 
3618 


3628 
3638 


3640 
3658 


3668 
3670 
3688 
3698 


3700 


371® 
3720 
3730 


3740 


3758 
3760 
3778 
3780 
3798 
3800 
3818 


38208 
38308 
3840 
3858 
3860 
3870 
3882 
3839 
33998 
3910 
3920 
3930 
3940 
3350 
3368 


3978 
3980 
3338 
4000 
4218 
4920 


IF AS<>”"5” THEN 3378 

GOSUB 759:60I0 3398 

IF cA$<>”"W”) OR CAS=-"W” AND AA> 
1792) THEN 3338 

SYS PS,AA:GOIO 3308 

IF A$<>”#” THEN 3410 

SyS 31880: GOSUB 580:G60T0 3398 

IF AS<>”$” THEN 3430 

SYS 31341:G0SUB 589:60T0 3388 

IF A$<>”C” THEN 34908 

SYS PR,17,0,C$ 

SYS IN,5,0,32,0,0:G60SUB 4560 
E=-VAL CFS): IF E<® OR E>1792 THEN 
3450 

T$="INPUT-ADRESSE:":SYS PR,17,0,T$ 
SYS PS,E:GDTO 33988 

IF AS<>”E” THEN 35108 

GOSUB 3959:60T0 3398 


IF A${>"V" THEN 3559 

AA=AA+2SE: IF AA>1792 AND Art=43152 
THEN AA=43152 

IF AR>6S288 THEN AA=D 

GOSUB 3678:6D0TD 33988 

IF A$<>”Z" THEN 3530 

AA=AA-256: IF AA<B THEN AA=65289:60TO 
3540 

IF AA<49152 AND AA>-1792 THEN AA= 
1792 

GOIO 3548 
IF AS<>”"T” 
GOIO 188 
IF CAS<CHRS (48) OR AS>CHRS (57)) 
AND CAS<>CHRS (135) THEN 339808 
SH=29: IF AS-=CHRS (13) THEN SH=13 
SYS PR,32,8,A$:POKE 198,1:POKE 631, 
SH 

SYS IN,5,2,32,0,8:60S5UB 4568 

E=UAL CF$):IF E<B OR E>65288 OR CE> 
1732 AND E<49152) IHEN 3642 
AA=E:6DSUB 36798:60T0 3388 

SYS PL,AA 

syS 34782 

AS-STRS (AA)+” "”:5YS PR,8,8,A$ 


B1=-AA+256: IF B1>1792 AND BI<=4S152 
IHEN B1=43152 

IF B1>65288 THEN B1-® 

SYS PR,31,8,B1:RETURN 

AA=768: PU=-8: POKE 53265,11:5YS 38726: 
GOSUB 4138: POKE 53265,27 

SYS 29610: AS=CHRS C PEEK (147)):1IF 
AS="H"” THEN SYS 34442:60T0 3740 

IF A$<>"A” THEN 3778 

G0SUB 8989:G0T0 3748 

IF A$<{>”"R" THEN 3798 

GOSUB 4130:60T0 3748 

IF A$<>"S” THEN 3818 

GOSUB 759:60T0 3748 

IF AS<>”#" THEN 3830 


SYS 31380:60SUB 589:60T0 3749 

IF AS{>"s$” THEN 3850 

SyS 31341:60SUB 580:60T0 3740 

IF AS${>"W" THEN 3870 

SYS PS, 768+PU*256:60T0 3748 

IF AS<>”"C” THEN 3938 

SYS PR,17,0,C$ 

SYS IN,1,0,32,0,13:G0SUB 4569 
E=-VAL (FS): IF E<® OR E>4 THEN 38908 
TS="INPUT-PUFFER :”:5YS PR,17,0,T8 
SYS PS,76B+E*256:60T0 3748 

IF AS>”E” THEN 3990 

GOSUB 3959:60T0 3748 

HB=INT CAA/256):LB=AA-HB*256 

OPEN 1,8,15:PRINT#1,"M-E” CHRS (LB) 
CHRS CHB): INPUTH1,A,B$S,C,D:CLOSE 1 
IS="FLEORPYS 

SYS PR,8,2,1$:5YS FE:RETURN 

IF AS<>"U” THEN 4028 

PU=PU+1:IF PU>4 THEN PU=-8 
AA=768+PU*256:60SUB 4139:60T0 37498 
IF AS<>”Z2” THEN 4058 


THEN 3618 


1555 
1305 
2698 


1364 
1499 
e182 
1324 
2150 
1571 
19094 
2207 
2360 


3461 
1237 
1384 
1304 


1484 
3439 


1033 
1308 
1517 
2713 


20398 


615 
1458 
58B 
3338 


2434 
e524 


2207 
4831 


1658 
sies> 
854 

2237 


3458 


1363 
1425 
5349 


3733 


1439 
1233 
1523 
1270 
1527 
1311 
1531 


elB5 
1356 
2153 
1576 
2594 
1543 
1894 
2202 
B2l5 
3456 
2203 
1464 
1316 
2389 
4273 


1388 
1893 
1442 
2157 
eB2l 


4030 
4904B 
4058 
4060 
49070 


488 
4999 


41920 
411® 
4128 


4138 
4140 
4150 
4168 
41708 
4188 
4198 


4200 
4210 
42208 


4238 
4240 
4250 
4268 


4270 
4280 


4230 
4308 
4310 
4320 
4330 


4340 
4350 


PU=PU-1:IF PU<® THEN Pu=4 
GOID 4018 

IF A$<>"t” THEN 4079 
'GOTO 188 


IF CAS<CHRS (48) DR AS>CHRS (5793) 
AND CAS<>CHRS (13)) THEN 3740 
SH=293: IF AS=CHRS (13) THEN SH=13 
SYS PR,32,0,A$:POKE 198,1:POKE 631, 
SH 

SYS IN,1,0,32,0,0:G60SUB 4568 

E=UAL (F$): IF E<ß OR E>4 THEN 41090 


AA=768+E*256: PU=-E:GOSUB 4139:GDTO 
3749 

SYS PL,AA 

SYS. 34916 

AS=-STR$S (PU)+” ”:SYS PR,8,0,A$ 


B1=-PU+1:IF B1>4 THEN Bi1-® 

SYS PR,31,8,B1:RETURN 

GOSUB 190:5YS 34550 

SYS PR,8,21,"C38CBM T3":SYS IN,38,1 
0,20,13 

GDSUB 4560:0PEN 1,8,15:PRINT#1,FS: 
INPUT#1,A,B$S,C,D:CLOSE 1 

IF A=-® THEN 188 

T$S="FLOPPY:”+STRS CA)+”, ”+BS+", "+ 
STRS (EC)+”,"+STR$ (D):SYS PR,9,23, 
T$; 

POKE 198,0:WAIT 198,255:G60T0 180 
SYS 36608:0PEN 1,8,15: INPUT#1,A,B$, 
C,D:CLOSE 1:IF A=®D THEN POKE 198,0: 
WAIT 198,255:60T0 188 

T$S=-"FLOPPY: "+STRS CA)+", "+BS+", "+ 
STR$S (C)+”,”"+STRS (CD) 

PRINT :PRINT T$:POKE 198,0:WAIT 198, 
255:60T0 188 

GOSUB 192 

T$S="BITTE GEBEN SIE DIE AKTUELLE 
GERAETE-":SYS PR,®,12,T$ 
TS="NUMMER IHRER FLOPPY EIN. DIESE 
WIRD”:SYS PR,8,14,T$ 

TS="DANN AUF DEN WERT >8< 
ABGERENDERT."”:SYS PR,0,16,T$ 
T$S="ALTE GERAETENUMMER : 9":SYS PR, 
0,19,T$ 

SYS IN,2,80,21,19,0:G60SUB 4560 

E=VAL (F$): IF E<B OR E>15 THEN 4320 

DPEN 1,E,15 

PRINT#1,”M-W"” CHRS (119) CHRS (9) 


Listing 1: Basicteil von Floppymaster 


20,FD,AE,20,3E,B7,86,Fa, 
86, FC,86,B2,20,FD,AE,20, 
9E,B7,86,FB,86,FD,86,B3, 
A9,31,8D,70,95,A9,4C,8D, 
31,35,20,10,35,A9,20,8D, 
31,95,E6,FB,A5,FB,A6,FA, 
DD,08,73,30,10,A2,00,86, 
FB,E6,FA,AS,FA,C9,24,90, 
04,A2,01,86,FA,A4,FB,AS, 
FA,CS,FC,D8,07,C4,FD,D®, 
03,4C,E1,71,85,9E,20,30, 
95,8E,83,95,80,84,35,84, 
9F,98,20,30,95,8E,86,35, 
80,87,35,20,90,95,A2,0F, 
20,C6,FF,18,A2,02,A0,08, 
PO,FO,FF,A3,08,A0,96,208, 
1E,AB,A2,02,A0,08,18,20, 
FO,FF,20,CF,FF,20,D2,FF, 
24,90,50,F6,20,CC,FF,AD, 
58,04,C9,30,D®,28,R2,02, 
20,C6,FF,20,CF,FF,C9,4B, 
D2,06,20,04,72,4C,D2,71, 
C9,20,00,03,20,16,72,#6, 
9E,86,B2,A6,9F,86,B3,C9, 
20,00,03,4C,45,71,20,CC, 


2149 
573 
1484 
SBB 
3446 


2434 
ese4 


2143 
ell17 
3213 


sceH4 

886 
2272 
2268 
1425 
1551 
7729 


3628 
798 
S565 


2464 
5119 
4123 
3071 


536 
4466 


4750 
4499 
3807 
2073 
2242 


784 
4097 


4368 
4370 
4389 


43938 
4480 
4410 
44208 
4439 


4440 
44508 
4468 
4470 
4480 
4490 


4508 
4518 
4520 
4538 
4540 
4558 
4560 


4570 
4588 
4590 
4600 
4610 
4620 
4638 
4549 
4650 


4669 
4670 


4688 
4698 
4790 


WWW .HOMECOMPUTERWORLD. EOM 


CHRS (2) CHRS (40) CHRS (C72):CLOSE 1 
POKE 186,8:60T0 188 

SYS IN,2,0,32,0,13:G0SUB 4568 

T1=VAL CF$): IF T1>35 OR T1<1 THEN 
4370 

SYS IN,2,0,36,0,13:G0SUB 4568 

SI=VAL (FS): IF S1I<Q® THEN 4399 

IF S1>VCT1) THEN 4398 

RETURN 

H=T1:H1=S1:T1=-PEEK (52991):S1=PEEK 
(52392) 

IF T1<=8 OR T1>35 THEN 4470 

IF S1>VCT1) THEN 4470 

RETURN 

T1=H:S1=H1:60TD 728 

B1$=-STR$ (B) 

IF LEN CB1$)<4 THEN B1$=” ”+B1$:60T0 
4498 

SYS PR,8,1,B15 

B2=PEEK (52991+B) 

IF B>127 THEN 2=128 

IF B<128 THEN 2=8 

SYS 31419,B2:RETURN 

SYS 64738 

F$S="":FOR I=8 TO PEEK (180)-1:F$=F$+ 
CHRS$ ( PEEK (40880+1)):NEXT I:RETURN 
C=-PEEK (48BB0):E=PEEK C4HOBB1): IF C= 
32.0R C=168 THEN C=48B 

IF E=-32 THEN E=-C:C=-4B 

RETURN 

POKE 40452,48:POKE 40457,58:POKE 
40462,65:POKE 40467,71:G1=48B:62=57: 
63-65: 64=79: RETURN 

POKE 40452,32:POKE 40457,128:POKE 
40462,168:POKE 40467,161 
61-32:62-127:63=169:64=161: RETURN 
POKE 40452,32:POKE 49457,128B:POKE 
40462,159:POKE 40467,161:61-48:62= 
57:63=48: 64=57 

RETURN 

F$S="":S1=-PEEK (180)-1: IF 51>15 THEN 
S1-15 

IF Si=-1 THEN 1750 

FOR I=-® TO S1:AS=CHRS (C PEEK (4H0B89+ 
I): IF AS<>CHRS (34) THEN 4700 

IF I=-® THEN 1750 

6010 1748 

FS=FS+A$: NEXT 1:G60TO 1748 


FF,A9,02,28,C3,FF,A9,0F 
20,C3,FF,n5,B2,C5,FC,D® 
0B,A5,B3,C5,FD,D9,05,19 
FF,85,FE,60,49,00,85,FE 
60,A2,01,20,CF,FF,C9,01 
D2,06,E8,D0,F6,n9,00,60 
AS,FF,60,A2,01,20,CF,FF 
C9,00,00,06,E8,D0,F6,A9 
00,60,A9,FF,60,20,FD,AE 
20,3E,B7,49,00,90,FF,CE 
EB,D®,FA,60,20,C3,FF,A9 
02,4C,C3,FF,20,1E,AB,18 
A2,02,R0,08,4C,F®,FF,AE 
FF,CE,E®,24,BO,0F,E®,01 
90,0B,AD,88,CF,DD,08,73 
B0,03,4C,65,72,19,00,85 
FE,698,49,4C,8D,31,95,20 
10,35,49,20,80,31,95,19 
31,80,7D,95,AD,FF,CE,85 
FA,AD,00,CF,85,FD,AS,FA 
20,30,95,8E,83,35,8D,84 
35,A5,FD,20,30,395,8E,86 
95,8D,87,35,20,30,95,43 
02,85,06,49,08,85,03,20 
6C,ES,A9,D8,AB,36,20,3F 
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1542 
2218 
2698 


2e26 
1832 
1555 

142 
3298 


178B 
1531 
142 
1559 
838 
2359 


1158 
1471 
1818 
1208 

943 


3.7237: 


’ 


’ 


’ 


’ 


’ 


4006 
3272 
1508 

142 
7381 
4659 
3845 
7503 

142 
3393 


1612 
3698 


1183 
619 
1421 


>» 


1058 
1068 
1978 
1289 
1038 
1188 
1118 
1128 
1138 
1140 
1158 
1168 
1170 
1189 
1198 
1208 
1210 
; 1228 
1230 
1249 
1258 


72,n2,0F,20,C6,FF,28,CF, 
FF,28,D2,FF,24,90,50,F6, 
20,CC,FF,AD,58,04,C9,3®, 
D0,23,A2,02,20,C6,FF,20, 
ECF,FF,AA,EO,24,B98,16,E®, 
01,90,12,20,CF,FF,DD,08, 
73,B0,0R,86,FA,85,FD,20, 
CC,FF,4C,81,72,A6,FA,EC, 
FF,CE,DO,0C,AS,FD,CD,00, 
CF,D0,05,49,08,4C,FD, 72, 
AS,FF,85,FE,A9,02,20,CC, 
FF,AS,0F,4C,37,72,15,15, 
15,15,15,15,15,15,15,15, 
15,15,15,15,15,15,15,13, 
13,13,13,13,13,13,12,12, 
12,12,12,12,11,11,11,11, 
11,11,A8,00,B1,FA,91,FC, 
C8,C0,28,D0,F7,n5,FA,18, 
69,28,85,FR,A5,FB,69,00, 
85,FB,AS,FC,18,69,28,85, 
FC,AS,FD,69,00,85,FD,Ca, 
D2,08,69,86,C0,85,93,60, 
60,20,1E,AB,18B,A2,00,n0, 
13,20,F0,FF,A3,7D,A0,73, 
20,1E,AB,18,n2,17,A0,00, 
20,F@,FF,A9,8B,A8,73,4C, 
1E,AB,49,4E,50,55,54,2D, 
54,52,41,43,4B,3A,20,00, 
53,43,52,4F,4C,4C,3A,20, 
43,55,52,53,4F,52,2D,55, 
59,20,20,43,55,52,53,4F, 
52,2D,44,4F,57,4E,00,A®, 
290,4C,B1,73,R0,0D,A2,00, 
4C,BA,73,A2,05,R0,21,18, 
20,FO,FF,A3,00,85,CC,A93, 
092,85,C6,20,E4,FF,FQ,FB, 
A6,CF,E0,08,D0,FaA,A2,01, 
4C,56,73,49,00,8D0,AB, 76, 
A9,74,8D,AC,76,49,02,8D, 
4B,77,49,74,80,4C,77,68, 
AS,BF,8D,AB,76,49,76,8D, 
AC,76,49,C1,8D,4B,77,#8, 
76,8D,4C,77,60,86,9C,A4, 
FA,B1,B8,85,B2,42,20,86, 
AS,A2,30,86,A6,86,A7,R2, 
02,86,A8,C3,10,90,17,C9, 
AQ,30,07,R2,01,86,16,38, 
E3,A0,C9,10,30,08,E6,A6, 
38,E9,10,4C,25,74,C9, 0A, 
99,07,R2,01,86,47,38,E3, 
0R,C9,01,90,08,E6,17,38, 
E3,01,4C,3C,74,4C,19, 77, 
A9,93,20,CA,88,18,A2,02, 
AD,00,20,FO,FF,A9,26,nD, 
75,20,1E,AB,1B,A2,00,AD, 
00,20,FO,FF,A9,AA,AQ,74, 
20,1E,AB,18,A2,15,A0,00, 
20,FO,FF,A9,E1,A9,74,20, 
1E,AB,18,N2,03,R0,00,20, 
FO,FF,AS,FD,A®,74,20,1E, 
AB,18,A2,14,R0,00,20,F®, 
FF,AS,FD,A8,74,20,50,73, 
18,A2,01,A0,00,20,FO,FF, 
A9,B8,R0,74,4C,1E,AB,S4, 
52,41,43,4B,3R,20,20,20, 
20,20,20,20,00,46,4C,4F, 
50,590,59,3A,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
29,20,20,20,20,00,42,45, 
46,45,48,4C,3A,20,43,20, 
46,20,48,20,55,20,57,20, 
S5A,20,23,20,24,20,31,2D, 
39,00,2D0,2D,2D,2D,2D,2D, 


Sonderheft 2 


WARE HOMESOMPUTERWORLD COM 


1268 DATA 
1270 DATA 
1288 DATA 
1298 DATA 
1308 DATA 
1310 DATA 
1320| DATA 
1330! DATA 
1349 DATA 
1358 DATA 
1368 DATA 
1378 DATA 
1388 DATA 
1390 DATA 
1400 DATA 
1418 DATA 
1429 DATA 
1430 DATA 
1449 DATA 
1450 DATA 
1468 DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,eD, 
2D,20,2D,2D,2D,2D,2D,2D, 
2D,2D0,00,53,45,4B,54,20, 
42,30,20,20,42,31,20,20, 
42,32,20,20,42,33,20,20, 
42,34,20,20,42,35,20,20, 
42,36,20,20,41,53,43,49, 
49,00,49,00,85,FB,A9,nD, 
85,FC,20,FD,AE,20,9E,B7, 
86,FA,E0,01,D0,08,49,31, 
80,6B,76,4C,6E,75,49,32, 
80,6B,76,20,FD,AE,20,9E, 
B7,84,20,77,76,8E,71,76, 
8D,72,76,20,FD,AE,20,9E, 
B7,86,FE,A9,00,85,FD,A9, 
OF,A2,08,AB,20,BA,FF,AS, 
00,20,BD,FF,20,C0,FF,R3, 
02 ,n2,08,RB,20,BA,FF,n9, 
01,n2,76,10,76,20,BD,FF, 
20,C0,FF,78,49,36,85,®1, 
58,AS,FD,28,77,76,8E,74, 
76,8D0,75,76,A5,FA,C9,01, 
FO,06,20,15,76,20,31,76, 
20,55,76,18,A2,01,A0,08, 
29,FO,FF,A2,OF,20,C6,FF, 
20,CF,FF,20,D2,FF,24,90, 
50,F6,20,CC,FF,AD,30,04, 
EA,4C,60,34,A5,FA,C9,01, 
D2,03,29,43,76,E6,FC,E6, 
FD,AS,FD,CS,FE,U0,B2, 78, 
A9,37,85,01,58,20,CC,FF, 
A93,02,20,C3,FF,AS,0F,4C, 
C3,FF,A2.0F.20,C9,FF,r2. 
00,BD,2A,76,20,D2,FF,EßB, 
E@,87,D8,F5,4C,CC,FF,42, 
2D,50,20,32,20,30,A2,02, 
20,C9,FF,A®,00,B1,FB,20, 
D2,FF,C8,D®,F8,4C,CC,FF, 
A2,02,20,C6,FF,A®,00,20, 
CF,FF,31,FB,C8,D®,F8,4C, 
CC,FF,A2,0F,20,C9,FF,ne, 
00,BD,6A,76,20,D2,FF,EB, 
E®,0C,D0,FS,4C,CC,FF,SS, 
31,20,32,20,30,20,31,38, 
20,31,38,23,A2,30,38,E3, 
OR,30,03,E8,B0,F9,69,3#A, 
60,49,00,85,FA,85,BB,A3, 
04,85, FC,85,06,A9,n0,85, 
FB,20,FD,AE,20,9E,B7,86, 
F7,80,18,69,40,85,B9,78, 
A9,36,85,01,58,A2,00,20, 
BF,76,E6,B9,E6,06,E6,F7, 
E8,EO,18,00,F2,78,#9,37, 
85,01,58,60,86,3C,A4, FA, 
B1,B8,85,B2,n2,00,86, AB, 
A2,30,86,15,86,A6,86,N7, 
A2,20,C3,0N,B0,07,86,45, 
86,A6,4C,0D,77,C9,64,B®, 
05,86,45,4C,F5,76,C9,64, 
30,08,E6,15,38,E9,64,4C, 
E3,76,C9,0N,B0,08,n4,AS, 
C0,®1,B0,0E,86,46,C9,®n, 
30,08,E5,16,38,E3,0A,HC, 
01,77,C9,@1,30,08,E6,N7, 
38,E9,01,4C,0D,77,A4, FRA, 
B3,79,77,AB,A5,B2,AA,29, 
80,4n,85,FE,8A,29,3F,05, 
FE,31,FB,A4,FA,B3,80,77, 
AB,AS,AS,91,FB,CB,AS,AG, 
91,FB,CB,AS5,A7,31,FB,E6, 
FA,AS,FA,C9,07,F0,03,4C, 
C1,76,78,49,37,85,01,58B, 
AQ,00,84,03,20,6C,ES,n5, 


7763 2828 DATA 21,58,A5,FB,18,69,28,85, A6 73B3 2768 DATA 00,00,908,00,808,20,5D,7A, C3 
776B 203® DATA FB,AS,FC,69,080,85,FC,498, B5 | 73BB 2778 DATA A9,93,En,EA,EA,A9,BB,AD, GE 
7773 284® DATA 00,85,FA,A6,SC,69,20,21, oa | 7SC3 2788 DATA 77,85,22,84,23,49,10,85, 36 
777B 2050 DATA 22,23,24,25,26,04,08,0C, 1C | 7SCB 2798 DATA 92,49,00,A0,04,85,24,84, DA 
7783 2068 DATA 10,14,18,1C,18,R2,01,A0, D® | 7303 28008 DATA 25,20,49,7A,A5,24,20,02, a3 
778B 2078 DATA 08,20,F0,FF,20,FD,AE,22, 8B | 73DB -2818 DAIA FF,AS,25,28,D2,FF,A9,20, BB 
7793 2088 DATA 9E,B7,8A,8D,D4,77,18,69, F® | 793E3 2828 DATA 208,02,FF,A9,00,B1,22,20, FF 
7793B 2098 DATA 01,80,01,78,20,FD,AE,20, BDO | 73EB 2838 DATA D2,FF,C8,C0,20,30,F6,20, 41 
7743 2108 DATA SE,B7,8E,1B,79,20,FD,AE, @81 | 79F3 2848 DATA CC,FF,A9,1F,65,24,85,24, FB 
77AB 211® DATA 20,9E,B7,8A4,18,69,01,8D, D3 | 79FB 2850 DATA 90,02,E6,25,18,A9,20,65, 79 
77B3 2128 DATA 66,78,4C,B8,79,49,00,85, CE | 7AB3 2860 DATA 22,85,22,90,02,E6,23,C6, AA 
77BB 213® DATA 7F,85,81,20,08,C1,20,42, 73 | 7ABB 2870 DATA 02,00,C6,AR2,0F,20,C3,FF, OF 
77C3 2148 DATA DO,RA9,4C,A2,58,A8,04,8D, ®1 7A1l3 ©2888 DATA A9,4D,20,D2,FF,A9,2D,20, 2D 
77CB 2159 DATA 09,06,8E,01,06,8C,02,06, FD | 7A1B 2838 DATA D2,FF,A9,45,20,D2,FF,AS, DB 
7703 2168 DATA A9,11,80,03,06,AD,03,06, 78 | 7A23 2908 DATA 00,20,02,FF,A9,04,20,D2, A6 
77DB 2178 DATA 85,0C,85,80,49,B0,85,03, F3 | 7A2B 2818 DATA FF,20,CC,FF,A2,0F,20,C6, 38 
77E3 2188 DATA AS,03,30,FC,A9,E0,85,03, 21 | 7A33 2928 DATA FF,20,CF,FF,20,D2,FF,AS, 57 
77EB 2198 DATA A5,03,30,FC,C9,08,08,03, 53 | 7A3B 2930 DATA 90,F0,F6,20,CC,FF,A9,0F, DD 
77F3 2288 DATA 4C,19,E6,C9,06,F0,F9,EE, 71 | 7A43 2948 DATA 20,C3,FF,EA,EA,50,A2,0F, BF 
77FB 2210 DATA 03,06,AD,03,06,C9,12,30, 67 | 7A4B 2950 DATA 20,C9,FF,A9,4D,20,D2,FF, AD 
7803 2220 DATA D4,290,42,D08,AD,00,1C,28, C& | 7AS53 2960 DATA A9,2D,20,D2,FF,A9,57,4C, 2B 
780B 2238 DATA FC,80,00,1C,60,AD,00,1C, EA | 7ASB 2978 DATA D2,FF,A9,00,20,BD,FF,A9, 35 
7813 2248 DATA 29,10,09,05,49,08,4C,DB, FS | 7AB3 2988 DATA OF,A2,08,AB,20,BA,FF,4C, E7 
781B 2250 DATA FD,A9,00,80,28,06,A0,00, 83 | 7ASB 2938 DATA Ca,FF,A93,D0,8D0,A8,89,8D, 7B 
7823 2268 DATA A2,00,45,39,99,08,03,C8, Ei | 7A73 3008 DATA 2C,88,80,96,88,80,CE,7A, EA 
782B 22708 DATA .C8,AD,28,06,99,00,03,C8, 11 | 7A7B 3010 DATA AS,7A,80,A9,89,80,2D,88, B4 
7833 2288 DATA AD,03,06,99,298,023,C8,AS, 37 | 7A83 3920 DATA 80,97,88,80,CF,7A,A9,17, DB 
783B 2298 DATA 13,99,00,03,C8,AS,12,53, 14 | 7ABB 303® DATA 8D,1E,930,AR9,7B,8D,1F,30, D3 
7843 23008 DATA 00,03,C8,A9,0F,393,08,03, SD | 7A93 3940 DATA 60,R9,40,8D,R8,89,8D,2C, EA 
784B 2310 DATA C8,99,00,03,C8,B3,FA,02, 32 | 7ASB 3050 DATA 88,80,96,88,80,CE,7A,A9, 39 
7853 2328 DATA 59.FB.902,59,FC,02,53,FD, SD | 7AA3 3060 DATA 91,80,49,89,80,20,88,8D, 7E 
785B 2338 DATA 02,39,F9,02,EE,28,05,AD, 7E | 7AAB 3070 DATA 97,88,8D,CF,7A,A9,A0d,BD, Bi 
7863, 2340 DATA 28,06,C9,15,38,BC,58,48, F3 | 7AB3 3088 DATA 1E,30,49,30,80,1F,90,60, 45 
786B 2350 DATA BA,SD,80,07,E8,D0,FA,AS, 4F | 7ABB 3990 DATA 20,FD,AE,20,9E,B7,86,FE, 20 
7873 2360 DATA 03,85,31,28,30,FE,68,#8, B2 | 7AC3 3190 DATA 18,A2,01,A0,1B,20,F®,FF, C4 
787B 2378 DATA 88,20,ES,FD,20,F5,FD,#S, CF | 7ACB 3110 DATA AS,FE,4C,40,31,A2,20,86, 3D 
7883 2388 DATA 07,85,31,28,ES,F5,85,34, D2 | 7AD3 ' 3128 DATA AS,A2,30,86,A6,86,A7,n2, D2 
788B 2338 DATA 20,8F,F7,#9,00,85,32,28, 6D | 7ADB 3130 DATA 00,86,48,C9,10,39,17,C9, 29 
7893 2488 DATA A3,FD,28,0E,FE,A3,FF,80, 7E | 7AE3 314@ DATA A0,30,07,A2,41,86,A6,38, SF 
7893B 241@ DATA 981,1C,R2,05,50,FE,B8,CA, C2 | 7AEB 3158 DATA E3,AR0,C9,10,90,08,E6,A6, CB 
78A3 2428 DATA DO,FA,A2,0A,A4,32,50,FE, 31 | 7AF3 31608 DATA 38,E9,18,4C,ED,7A,C9,0n, 45 
78AB 2430 DAIA BB,BS,008,03,80,01,1C,C8, DC | 7AFB 3178 DATA 90,07,AR2,41,86,17,38,E9, 17 
78B3 244® DATA CA,D®,F3,R2,09,50,FE,BB, 49 | 7803 3188 DATA 0A,C9,01,30,08,E5,A7,38, 45 
78BB 2450 DATA AS,55,80,01,1C,CA,D,FS, ®C | 7B0B 3198 DATA EI,01,4C,04,7B,A9,A5,Ad, 06 
78C3 2460. DATA AS,FF,A2,05,50,FE,B8,8D, C4 | 7B13 3208 DATA 09,4C,1E,AB,86,3C,84,9B, FB 
78CB 247® DATA 01,1C,CA,D®,F7,A2,BB,50, SF | 7B1B 32108 DATA A2,20,86,45,R2,30,86,A6, B4 
7803 2488 DATA FE,B8,BD,08,21,8D0,201,1C, SC | 7823 3228 DATA 86,A7,n2,00,86,48,C9,10, 17 
78DB : 2498 DATA E8,D®,F4,R®,00,50,FE,BB, 61 | 7B2B 3230 DATA 30,17,C9,A0,30,07,A2,01, CB 
78E3 2508 DATA B1,30,80,01,1C,C8,D00,F5S, 3B | 7B33 3240 DATA 86,46,38,E9,R0,C9,10,30, 87 
78EB 2518 DATA A9,55,A2,09,50,FE,B8,8D, 6A | 7B3B 3258 DAIA 08,E6,46,38,E3,10,4C,38, 7D 
78F3 2520 DATA 81,1C,CA,D®,F7,A5,32,18, 4B | 7B43 3268 DATA 7B,C9,04,90,07,R2,01,86, 2E 
78FB 2538 DATA 69,0A,85,32,CE,28,06,00, 8D | 7B4B 32708 DATA A7,38,E93,0R,C9,01,30,08, SC 
79383 254® DATA 94,50,FE,B8,50,FE,B8,20, 74 | 7B53 3288 DATA E6,A7,38,E9,01,4C,4F,7B, 18 
790B 2550 DATA 80,FE,A9,C8,80,23,06,49, AB | 7BSB 3298 DAIA 4C,F6,30,18,A2,0A,A0,09, FC 
79313 2568 DATA 00,85,30,49,03,85,31,#49, OA | 7B63 3308 DATA 20,FO,FF,A9,2A,A0,7C,20, 6D 
7931B 2578 DATA 01,8D,28,06,20,56,F5,A2, B3 | 7B6B 3318 DATA 1E,AB,18,A2,00,n0,09,20, “1 
79323 2588 DATA OA,AB,14,50,FE,B8,AD,01, 20 | 7873 3328 DATA FO,FF,A9,3B,A0,7C,20,1E, 85 
732B 2598 DATA 1C,01,30,F®,0A,CE,23,06, E7 | 7B7B 3338 DATA AB,18,R2,10,R0,09,20,F0, EB 
79333. 2608 DATA DO,DD,A9,06,4C,DB,FD,C8, 3B | 7B83 3348 DATA FF,A9,51,A0,7C,20,1E,AB, D6 
733B 2610 DATA CA,DO,E8,18,45,30,693,0A, SD | 7BBB 3358 DATA 18,A2,13,A0,09,20,F0,FF, C4 
7343 2628 DATA 85,30,20,56,F5,A0,BB,58, DE | 7833 3368 DATA A9,5SE,A0,7C,20,1E,AB,A9, 72 
7934B 2638 DATA FE,B8,AD,01,1C,D9,00,01, 34 | 7B3SB 3378 DATA 090,85,C6,20,E4,FF,FO,FB, FB 
79353 2648 DATA D9,DB,C8,D8,F2,A2,FC,58, ES | 7BA3 3388 DATA C9,85,00,06,EE,20,00,4C, SE 
7935B 2650 DATA FE,BB,AD,®1,1C,D3,00,07, 2E | 7BAB 3398 DATA 9E,7B,C9,86,D8,06,EE,21, FB 
7363 2668 DATA D8,CB,C8,CA,D®,F1,CE,28, 88 | 7BB3 3498 DATA D9,4C,9E,7B,C9,87,00,27, 31 
736B 2670 DATA 06,00,B1,A9,01,4C,DB,FD, D2 | 7BBB 3418 DATA EE,86,02,A9,00,85,FA,A9, 8D 
79373 26B® DATA 098,00,00,00,00,00,00,00, 88 | 7BC3 3428 DATA D8,85,FB,A2,03,AD,86,02, 86 
797B 2698 DATA 00,00,00,00,00,20,00,00, 088 | 7BCB 3438 DATA AQ,00,91,FA,C8,DO,FB,E6, 43 
79383 2708 DATA 08,00,00,00,020,00,008,008, 00 | 7Bn3 3440 DATA FB,CA,DO,F4,A2,E9,SD,FF, 64 
793BB ‚2710 DATA 00,00,00,00,00,00,00,08, 80 | 7BDB 3458 DATA DA,CA,D®,FA,4C,SE,7B,C9, 46 
79393 2729 DAIA 00,00,00,00,00,200,008,00, oa | 7BE3 3458 DATA 88,00,B8,60,20,FD,AE,20, Cc2 
79393B 2738 DATA 20,00,00,00,00,00,00,00, 08 | 7BEB 3470 DATA BA,AD,=0,F7,B7,A5,14,85, AB 
7aA3 2748 DATA 00,00,00,00,00,00,00,00, 08 | 7BF3 3488 DATA FA,A5,15,85,FB,A9,0F,A2, At 


775B 2018 DATA F7,20,490,31,78,R9,36,85, 86 7SAB 2758 DATA 092,00,00,00,008,00,00,00, 0® 
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OB,AB,20,BA,FF,A9S,00,20, 
BD,FF,20,C0,FF,A2,0F,2®, 
C9,FF,A9,26,N0,7C,20,1E, 
AB,AS,FA,20,D2,FF,AS,FB, 
20,D2,FF,20,CC,FF,AS,®F, 
4C,C3,FF,4D,2D,45,00,2D, 
46,31,2D,20,52,41,48,4D, 
45,4E,46,41,52,42,45,00, 
2D,46,33,2D,20,48,49,4E, 
54,45,52,47,52,55,4E,44,_ 
46,41,52,42,45,00,2D,46, 
35,2D,20,53,43,48,52,49, 
46,54,00,2D,46,37,2D,20, 
57,41,48,4C,20,42,45,45, 
4E,44,45,4E,00,49,00,85, 
AS,A9,01,85,F7,A9,C0,85, 
AG,A9,04,85,FE,A5,A5,85, 
A7,AS,A6,85,AB,AB,05,n2, 
09,B1,47,C9,00,F0,35,AS, 
A7,18,69,20,85,47,A5,AB, 
69,00,85,AB,CA,D®,EA,AS, 
AG,C9,CF,F®,1F,AB,00,AS, 
12,91,A5S,C8B,AS,FE,91,5, 
E6,A6,E6,F7,AS,FE,18,69, 
03,C9,13,90,02,E3,11,85, 
FE,4C,80,7C,R9,00,A8,31, 
AS,CB,A9,FF,931,A5,4C,64, 
85,A9,60,8D,D2,7F,A9,00, 
85,A5,A9,C0,85,A6,A0,05S, 
B1,45,C9,00,F®,33,A0,0e, 
B1,AS,29,4F,C9,00,D0,16, 
AS,A5,85,B6,A5,A6,85,8B7, 
20,3E,7F,A5,B6,85,A5,RS, 
B7,85,A6,4C,E1,7C,A5,nS, 
18,69,20,85,A5,A5,R6,69, 
00,85,A6,A5,A6,C9,D0,30, 
CS,A9,4C,8D,D2,7F,4C,E7, 
82,n9,00,85,F8,85,B3,#9, 
01,85,F7,19,00,85,A5,#9, 
C0,85,A6,10,05,B1,45,C9, 
00,F®,17,E6,F8,E6,B3,#S, 
AS,18,69,20,85,A5,A5,A6, 
69,00,85,A6,A5,A6,C9,D®, 
90,E3,n5,F8,C3,01,F0,7E, 
90,7C,R9,00,85,A5,149,C®, 
85,A6,C6,F8,45,F7,85,Be, 
E6,B2,A5,A5,18,69,20,85, 
A7,AS,A6,569,00,85,AB,En, 
AD,05,B1,A5,20,DC,7D,An, 
B1,A7,20,DC,7D,85,FE,E4, 
FE,F®,04,B®,0R,30,19,C8, 
CO,15,00,E6,4C,AB,7D,n®, 
00,B1,A5,AA,B1,A7,91,#5, 
8A,31,A7,C8,C®,20,00,F1, 
EB,B2,A5,A7,18,69,20,85, 
A7,AS,AB,69,00,85,AB,n5, 
B2,C5,B3,390,BA,F®,B8,E6, 
F7,A5,A5,18,69,20,85,A5, 
AS,ABG,69,00,85,A6,A5,F7, 
C5,F8,30,30,F®,BE,4C,E7, 
82,C9,A0,D0,02,A9,00,60, 
A9,05,85,3B,19,00,85,3E, 
A9,C0,85,9F,A6,3B,A0,03, 
18,20,F®,FF,A9,3E,28,D2, 
FF,20,E4,FF,F®,FB,85,FE, 
AS,FE,C9,55,D8,16,A8,02, 
B1,9E,AA,29,40,C39,40,F®, 
08,8n,09,48,31,9E,20,E7, 
82,4C,FC,7D,AS,FE,C9,46, 
D0,13,A0,02,B1,9E,AA,29, 
49,C3,49,D®,EC,8N,43,4®, 
91,3E,4C,19,7E,AS,FE,CS, 
54,00,3A,20,00,8C,19,00, 
85,C6,20,E4,FF,F®,FB,85, 
FE,18,A2,01,A8,0E,20,F®, 


72 GXUW Sonderheft 2 
WRNHOMECONPUTERWORLB. COM 


FF,A9,SE,AB,7E,2Q,1E,AB, 
4C,03,7E,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,00,A5,FE,Cs, 
00,D0,08,20,D5,7F,A9,0®, 
85,B2,60,AS,FE,C9,94,D®, 
06,20,33,7F,4C,19,7E,AS, 
FE,C9,14,D8,06,20,36,7F, 
4C,19,7E,AS,FE,C9,5E,D®, 
08,20,05,7F,A9,80,85,B2, 
60,AS,FE,C9,31,00,3C,20, 
DS,7F,C6,98B,C6,39B,A5,98, 
C9,05,80,13,E6,3B,E6,38B, 
C6,AA,AS,AA,C9,01,B0,02, 
A9,80,85,AN,20,E7,82,#5, 
9E,38,E9,20,85,9E,A5,8F, 
E3,00,85,9F,C9,C0,B0,08, 
A9,E0,85,9E,A9,CF,85,9F, 
YC,EF,7D,AS,FE,C9,11,D0, 
3C,20,05,7F,E6,9B,E6,98B, 
AS,3B,C9,15,90,13,C6,38B, 
C6,3B,E6,AA,AS,AA,C9,81, 
930,02,19,01,85,An,20,E7, 
82,A5,3E,18,69,20,85,9E, 
AS,9F‘,69,00,85,9F,C9,D00, 
930,08,49,00,85,9E,A9,C0, 
85,9F,4C,EF,7D,4C,FC,7D, 
A9,E0,85,A5,A9,CF,85,6, 
85,AB,A9,C0,85,17,A®,1F, 
B1,A7,91,A5,88,10,F9,38, 
AS,A7,85,A5,E9,20,85,97, 
AS,AB,85,N6,E9,00,85, AB, 
AS,N7,C5,39E,AS,AB,ES,9F, 
BO,DC,A2,1F,A®,1F,BD,75, 
7F,91,9E,88,CA,10,F7,4C, 
E7,82,00,00,80,12,01,2D, ! 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,20, 
00,00,00,00,00,00,00,00, 
00,00,00,15,9E,85,AS,AS, 
gF,85,A6,AS,A5,C9,EO,AS, 
AG,ES,CF,B®,21,n5,45,18, 
69,20,85,17,A5,16,69,00, 
85,AB,A®,ıF,B1,A7,91,#5, 
88,10,F9,A5,A7,85,A5,#5, 
AB,85,A6,4C,3E,7F,AD,1F, 
A9,00,91,R5,88,10,FB,4C, 
E7,82,A6,39B,A0,03,18,20, 
FO,FF,A9,20,4C,D2,FF,7E, 
C9,00,D0,02,A9,20,84,71, 
AB,29,80,4A,85,72,98,29, 
3F,05,72,44,D3,91,D1,E6, 
D3,A4,71,60,11,20,FD,AE, 
20,3E,B7,E0,00,00,05,n9, 
CO,4C,11,80,A9,C4,85,FB, 
AS,04,85,FD,A93,78,85,FA, 
85,FC,A2,12,4C,2D,73, FR, 
91,FC,C8,08,F9,E6,FB,E6, 
FD,E8,E0,04,D0,EE,60,20, 
FD,AE,20,9E,B7,86,A6,56, 
BB,E®,13,30,06,84,38,E3, 
12,85,BB,20,FD,AE,20,3E, 
B7,86,A7,20,FD,AE,20,3E, 
B7,86,FE,A9,50,85,FA,n9, 
04,85,FB,A2,00,AS,FA,1B, 
69,28,85,FA,AS,FB,69,00, 
85,FB,E8,E4,BB,DO,EE,AS, 
A7,18,69,0R,n8,n5,FE,AN, 
29,80,4A,85,B2,8n,29,3F, 
05,B2,91,FA,A5,A6,C9,13, 
BO,05,A0,C0,4C,34,80,n0, 
C4,A2,00,20,B3,3D,A3,EB, 
85,FA,A9,C8,85,FB,A2,00, 
AS,FA,18,69,18,85,FA,nS, 


FB,69,00,85,FB,EB,E4,A6, 
DO,EE,A4,A7,AS,FE,S1,Fa, 
60,05,B2,60,49,01,A2,08, 
AQ,OF,20,BA,FF,A9,00,20, 
BD,FF,20,C0,FF,A9,02,R2, 
OB,AB,20,BA,FF,A9,01,A2, 
05,R®,81,20,BD,FF,20,C0, 
FF,A2,01,20,C9,FF,A9,06, 
AB,81,20,1E,AB,20,CC,FF, 
A2,01,20,C3,FF,A9,12,AD, 
81,20,1E,AB,20,CC,FF,4C, 
1A,81,23,55,31,20,32,20, 
30,20,31,38,20,30,00,42, 


eD,50,20,32,20,34,00,A2,. 


02,20,C9,FF,A9,00,85,FRn, 
A9,C9,85,FB,A2,00,86,FE, 
B6,B2,A5,B2,69,00,D0,03, 
PO,A4,81,A9,00,85,FC,AD, 
00,B1,FA,C9,2A,D®,07,45S, 
FC,19,9C,81,85,FC,C8,C® 
08,D0,EE,AS,FA,18,69,08, 
BS,FA,AS,FB,69,00,85,FB, 
AS,FC,20,D2,FF,E6,B2,#S, 
B2,C9,23,00,04,49,00,85, 
B2,E6,FE,AG,FE,EO,69,D0, 
B9,20,CC,FF,A2,01,20,C9, 
FF,A9,30,n0,81,20,1E,AB, 
20,CC,FF,A9,01,20,C3,FF, 
A9,02,4C,C3,FF,55,32,20, 
32,20,30,20,31,38,20,39, 
00,01,02,04,08,190,20,40, 
B0,R0,00,84,A6,B1,FA,C9, 
2eA,DO,02,E6,N6,C8,C0,18, 
DO,F3,AS,A6,4C,D2,FF,0®, 
A2,01,A5,CF,C9,00,D®,Fn, 
86,CC,60,24,19,30,08,C9, 
20,F0,0A,C9,3D,F®,06,20, 
9D,80,4C,A7,81,88,18,680, 
CO,24,B0,02,A0,24,99,01, 
01,399,00,01,38,60,C0,24, 
BO,02,n0,24,99,01,01,n5S, 
7A,99,02,01,45,7B,39,03, 
01,A9,00,F0,E4,A3,0F,R2, 
08,nB,20,BA,FF,N9,00,20, 
BD,FF,20,C0,FF,A9,02,re, 
08,AB,20,BA,FF,A9,01,n2, 
C2,R0,82,20,BD,FF,20,C0, 
FF,A9,00,85,FA,n9,C0,85, 
FB,A9,12,85,B2,n9,01,85, 
B3,A9,00,85,FE,85,A8,20, 
BA,82,20,CF ,B2,A2,02,20, 
C6,FF,20,CF,FF,A®,00,91, 
FA,85,B2,C9,00,00,04,49, 
FF,85,FE,20,CF,FF,AB,01, 
91,FA,85,B3,C8,84,FD,20, 
CF,FF,A4,FD,91,FA,C8,84, 
FD,DO,F4,20,CC,FF,E6,FB, 
E6,A9,AS,FE,C9,FF,DO,BF, 
A5S,A9,80,3C,03,A9,02,20, 
C3,FF,A9,0F,4C,C3,FF,A2, 
OF,20,C9,FF,A5,B2,20,B5, 
82,8E,CA,82,80,CB,82,#5, 
B3,20,B5,82,8E,CD,82,8D, 
CE,82,A2,00,BD,C3,82,20, 
D2,FF,E8,E®,0C,D®,FS,4C, 
CC,FF,A2,30,38,E3,0R,30, 
03,E8,B0,F9,69,34,60,23, 
55,31,20,32,20,30,20,31, 
3B,20,30,37,R2,0F,20,C9, 
FF,A9S,DE,AB,82,20,1E,AB, 
4C,CC,FF,42,2D,50,20,32, 
20,30,00,4C,A6B,AA,86,AB, 
AS,FA,85,45,A5,FB,85,A6, 
EQ,01,F0,0F,CA,AS,AS,18, 
69, 20,85,45,30,F2,E6,R6, 


WWW;HOMECSOMPUTERWORLEGOM 


4C,F3,82,38,20,F®,FF,86, 
71,84,72,18,n2,05,A0,00, 
2@,FO,FF,A9,08,85,FE,20, 
50,83,C6,FE,F®,27,45,#5, 
C5,FC,A5S,A6,ES,FD,BO,0E, 
A5,A5,18,69,20,85,45,90, 
02,E6,A6,4C,1A,83,A5,FA, 
85,A5S,AS,FB,85,A6,A9,01, 
85,AB,4C,1A,83,18,46,71, 
A4,72,4C,FO,FF,A9,00,65, 
D3,AS,AB,85,F7,E6,AB,ns, 
00,85,FB,A5,F7,C9,64,B0, 
18,A9,20,20,E3,7F,A5,F7, 
C9,0A,BQ,05,R9,20,20,E3, 
7F,20,28,84,A9,04,85,D3, 
Ag,22,20,E3,7F,AR0,05,20, 
3E,98,EA,EA,18,A6,D6,n®, 
18,20,FO,FF,AQ,1E,B1,AS, 
85,F7,C8,B1,A5,85,F8,00, 
16,45,F7,C9,64,B9,10,9, 
20,20,E3,7F,AS,F7,C9,0n, 
B0,05,A9,20,20,E3,7F,20, 
28,84,49,20,EA,EA,EA,2®, 
E3,7F,20,E3,7F,A0,02,Bl, 
AS,48,29,0F,AA,BD,91,84, 
20,E3,7F,BD,96,84,20,E3, 
7F,BD,3B,84,20,E3,7F,68 
29,40,F0,05,49,3C,20,E3 
7F,A9,20,20,E3,7F,20,Be 
87,R0,03,B1,A5,85,F7,no 
00,86,F8,C9,0N,B0,05,19 
20,20,E3,7F,20,28,84,#9 
20,20,E3,7F,EA,EA,EA,AO 
04,B1,A5,85,F7,A2,00,86, 
F8,C9,0A,B0,05,19,20,00, 
E3,7F,20,28,84,49,0D,20, 
D2,FF,4C,D2,FF,A9,00,85, 
B7,85,B8,85,B9,A2,10,FB, 
06,F7,26,F8,A5,B9,65,8B9, 
85,89,R5,B8,65,B8,85,B8 
AS,B7,65,B7,85,B7,D8,CA 
DO,ES,A5,B7,09,30,2D,40 
03,R5,B8,20,7n,84,A5,B9 
20,7N,84,A2,00,BD,40,03 
C9,30,D0,05,E8,E0,05,90 
F4,20,E3,7F,E8,E0,05,B®, 
05,BD,40,03,D00,F3,60,48, 
20,84,84,68,29,0F ,4C,Bn, 
84,29, F0,4n,4A,4A,4n,09, 
30,E8,90,40,03,60,44,53, 
50,55,52,45,45,52,53,45, 
4C,51,47,52,4C,D®,EE,60, 
A9,93,20,CA,88,49,18,85, 
D6,A9,03,85,D3,20,6C,Es, 
A9,BF,AO,84,20,1E,AB,Ag, 
00,85,D6,60,42,45,46,45, 
48,4C,45,3A,20,20,48,20, 
20,57,20,20,56,20,20,5n, 
20,20,41,20,20,55,20,20, 
46,20,20,54,20,20,5E,00, 
AS,FA,18,69,20,85,Fa,n5, 
FB,69,00,85,FB,60,20,FD, 
AE,20,9E,B7,86,B2,n2,00, 
A9,DC,18,69,04,E8,E4,Bo2, 
D2,F8,85,FB,A9,04,85,FD, 
A9,00,85,FA,85,FC,An,78, 
A9,35,85,01,A0,00,Bl,Fn, 
91,FC,C8,D®,F9,E6,FB,E6, 
FD,E8B,E®,04,D®,EE,A9,37, 
85,01,58,60,20,FD,AE,20, 
SE,B7,86,B2,n2,00,A3,DC, 
18,69,04,E8,E4,B2,D®,FB, 
85,FB,A9,04,85,FD,A9,00, 
85,FA,85,FC,AA,AD,00,Bl, 
FC,91,FA,C8,D08,F9,E6,FB, 


’ 


’ 


’ 


Sonderheft 2 Qu 73 
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BSSB 6499 DATA E6,FD,E8,E0,04,D0,EE,60, B3 8753 7128 DAIA 80,4D,49,54,280,45,49,4E, 7F 
8563 65088 DAIA AQ,AS9,0F,A2,08,R8,20,BA, 2C 875B 7138 DATA 45,52,20,4D,41,58,?E,20, BE 
BS6B 6518 DATA FF,A9,00,20,BD,FF,29,C0, 54 8763 7148 DATA 4C,41,45,4E,47,45,20,56, CE 
8573 6528 DATA FF,A9,02,n2,08,A8,20,BA, 7D 876B 7158 DATA 4F,4E,20,33,38,20,5A,45, 1B 
857B 6538 DATA FF,A9,01,A2,ED,n®,85,28, 57 8773 7168 DATA 49,43,48,45,4E,20,41,4E, 2A 
8583 6549 DATA BD,FF,28,C0,FF,A9S,00,85, FO 877B 7170-DATA 09,44,49,45,20,45,4C,4F, 98 
B58B 56559 DATA FA,A9,C0,85,FB,49,09,85, 53 8783 7188 DATA 50,590,59,53,54,41,54,49, 24 
8593 6568 DATA FE,A9,12,85,FC,49,01,85, Bı 878B 7198 DATA 4F,4E,20,53,45,4E,44,4S, C4 
853B 5578 DATA FD,29,D6,85,R2,02,20,C3, 24 8733 72098 DATA 4E,2E,00,48,49,00,20,00, Al 
85A3 6588 DAIA FF,A9,00,78,A2,35,86,01, D3 873B 7218 DATA 82,20,00,8A,AS,CF,85,FD, 3A 
BSAB 6590 DATA B1,FA,A2,37,86,01,58,28, DF 87A3 7228 DATA AS,E0,85,FC,A9,C0,85,FB, C6 
85B3 6688 DATA D2,FF,C8,D8,EE,20,CC,FF, 65 B7AB 7238 DATA A9,01,85,AA,4C,E7,82,18, 52 
85BB 5618 DAIA 29,EE,85,20,32,86,E6,FB, 2E 87B3 7248 DATA A6,D6,AB,22,4C,FO,FF,60, 489 
85C3 6628 DATA EG,FE,AB,FE,EA,E4,F7,D0, BD 87BB 7258 DATA AS,0B,80,11,D0,4C,90,39, 33 
8SCB 6638 DATA D9,AS,0F,20,C3,FF,A9,02, 81 87C3 70268 DATA 60,18,85,D3,85,06,28,6C, SE 
8503 66408 DATA 4C,C3,FF,A2,0F,20,C9,FF, 9F 87CB 7278 DATA ES,A3,D3,A8,87,4C,1E,AB, 1D 
BSDB 6658 DAIA A9,ES,AB,85,20,1E,AB,4C, 40 8703 7288 DATA 48,3A,48,41,52,44,43,4F, 17 
"85E3 65668 DATA CC,FF,42,2D,50,20,32,20, 24 87DB 7238 DATA S0,59,900,R2,80,20,06,30, 2C 
BSEB 65678 DATA 30,00,23,AS,FC,20,25,86, 29 87E3 7308 DAIA EA,EA,EA,20,C3,87,A2,008, A7 
85F3 6588 DATA BE,20,86,80,21,86,A5S,FD, AA 87EB 7318 DATA 28,06,39,A9,00,85,D6,A9, AS 
BSFB 655699 DATA 20,25,86,8E,23,86,8D,24, FS 87F3 7328 DATA 08,85,03,20,6C,ES,A9,4D, 19 
8603 67008 DATA B6,A2,0F,20,C9,FF,R2,00, 3F 87FB 7338 DATA AO,88,20,1E,AB,A9S,1F,85, BB 
B60B 5710 DATA BD,19,86,20,D2,FF,E8,E®, E4 8803 7348 DATA D3,20,6C,ES,A3,4D,RA0,88, AD 
8613 6728 DATA 0C,D0,FS,4C,CC,FF,S5,32, DS 8808 7350 DATA 20,1E,AB,A9,09,85,03,49, B2 
B61B 67398 DATA 20,32,20,30,20,31,38,208, ES 8813 7368 DATA 01,85,06,20,6C,E5,A9,55, ®D 
8623 6748 DATA 31,30,A2,30,38,E3,04,30, 3D 881B 7370 DATA AB,88,20,1E,AB,A9,1B,85, B2 
B62B 56750 DATA 03,E8,B0,F9,69,3A4,60,78, EA 8823 7388 DATA D3,20,6C,ES,AE,FF,CE,BA, 2D 
8633 6768 DATA A9,35,85,01,A0,00,B1,FA, 4D 882B 7398 DATA 20,40,91,4C,47,88,D2,FF, B7 
863B 6778 DATA 85,FC,C8,B1,FA,85,FD,A3, 6B 8833 7408 DATA EO,0n,B0,05,A9,20,20,D02, 56 
8643 6780 DATA 37,85,01,58,60,43,20,FD, SC 883B 741® DATA FF,BA,AB,20,R2,B3,20,0D, 2E 
864B 6790 DATA AE,20,8A,AD,20,F7,87,78, D3 8843 7420 DATA BD,20,1E,AB,A9,1B,8D,11, 19 
8653 6800 DATA A9,35,85,01,A0,00,B1,14, 33 884B 7438 DATA D0,60,20,20,20,20,20,20, 70 
865B 6818 DATA 09,40,91,14,R9,37,85,01, 3B 8853 7440 DATA 20,90,20,20,30,00,19,0B, EE 
8663 6828 DATA 58,60,20,FD,AE,20,8A,AD, 86 885B 7450 DATA 8D0,11,00,20,46,97,4C,C3, 63 
B665B 56830 DATA 20,F7,B7,78,A3,35,85,01, 60 | 8863 74608 DATA 87,n2,80,20,06,390,EA,EA, BB 
8673 6840 DATA AD,00,B1,14,29,40,C9,40, AE BB6B 7478 DATA EA,29,C3,87,n2,00,20,06, Ci 
867B 6850 DATA D0,06,81,14,29,BF,91,14, 4D 8873 748 DATA 930,A9,09,85,03,1R9,01,85, 12 
8683 6868 DATA A9,37,85,01,58,690,42,AR9, 86 887B 7498 DATA D6,20,6C,ES5,A9,55,R0,88, AB 
B6BB 6878 DATA 7E,A2,04,n8,00,20,BA,FF, DC 8883 7508 DATA 20,1E,AB,A9,1B,85,03,#9, C4 
8693 6888 DATA AS9,00,20,BD,FF,20,88,3A, DB 
869B 6839 DATA D0,0E,4C,ED,86,A9,1F,28, FD 
B6RA3 690908 DATA D2,FF,AS,90,C9,80,F6,42, DE & 
BEAB 6910 DATA A9,00,n0,04.85,71,84,72, 6A a ee IS SEITEN LEE 
SEB 3 EA ee ‚FF,28, 51 GOSUB 60040 : 

6930 DATA Ei1,FF,F®O,2E,RA®,00,B1,71, 83 ERTEN BEN 
86C3. 6940 DATA 85,67,29,3F,06,67,24,67, 65 ar 6 a ven 
B6CB 6950 DATA 10,02,09,80,70,02,89,40, CE |' B:GDSUB 80040 > j 
8603 6968 DAIA 20,02,FF,C8,C0,28,00,E6, 97 g80020 


FS="PRUEFSUMME OK": IF S<£> 5699 
BEDB 6378 DATA 98,18,65,71,85,71,380,02, ı5 H+L THEN FS="LRUSI 
86E3 6380 DATA E6,72,CA,D8,CD,A9,00,20, 7F | PRUEFSUFMIMENFEHLER”: F=F+1 
BGEB 5639308 DAIA D2,FF,20,CC,FF,AS,7E,4C, BO 60030 GOSUB '60898:NEXT A:PRINT ” 2267 
B6EF3 70888 DATA C3,FF,A1,A9,0A,85,D6,A9, 6E CDOWNI”F"FEHLER”: END 
B6FB 7218 DATA 80,85,03,280,6C,E5,A3,2C, 32 60048 READ H$:60SUB 60050: H=L* 2715 
8703 7028 DATA AB,87,28,1E,AB,A9,0C,85, 4 16:H$=MID$ CHS,2) 
870B 7030 DATA D6,A3,00,85,03,28,6C,ES, E2 59050 L-ASC CHS+"X”)-4B: IF L<® 3198 
8713 70428 DATA A3,54,AB8,87,20,1E,AB,AS, 71 DR L>22 THEN 60080 
871B 7058 DATA 8E,85,06,49,00,85,D3,20, E4 60960 IF L<19 THEN RETURN 1044 
8723 708568 DATA 6C,ES,A3,7C,A8,87,4C,1E, FB 69078 L=L-7:IF L>3 THEN RETURN 1334 
872B 7070 DATA AB,S3,493,45,20,4B,4F,45, 3B 60082 F$="LRUSIEINGABEFEHLER”:L= 2460 
8733 7®B® DATA 4E,4E,45,4E,29,4E,55,4E, DO 0: F=F+1 
873B 7038 DATA 28,4A,45,44,45,4E,20,42, AD "68098 PRINT "ZEILE” PEEK (64) * 2726 
8743 7188 DATA 45,4C,49,45,42,49,47,45, FB ES6+PEEK (63)F$: RETURN 
874B 7110 DATA 4E,20,42,45,46,45,48,4C, 2B 


Listing 2: Kombinierter Hexdump-Basiclader von:Floppymaster, Teil] 


01,85,06,20,6C,ES,AE,FF, D®,20,44,E5,68,80,21,D0, 
CE,8N,20,48,31,4C,B1,88, 60,41,53,20,46,49,4C,45, 
D2,FF,E®O,0N,B0,05,A39,20, 20,50,31,20,49,4E,20,59, 
20,D2,FF,8A,A8,20,A2,B3, 32,00,4C,E6,52,En,En,En, 
20,DD,BD,20,1E,AB,A9,1B, 4C,05,89,03,R9,18,85,D6, 


8D,11,0D0,690,20,4E,41,4D, 20,6C,E5,49,D3,A0,89,20, 
45,4E,20,50,31,2@0,49,4E, 1E,AB,A2,80,20,06,30,r2, 
20,50,32,00,11,20,27,AD, 20,20,06,90,4C,24,89,18, 
21,D0,48,AD,86,02,80,21, 85,06,20,6C,E5,R9,D3,R8, 


74 GUN Sonderheft2 _ 
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8S1B ° 192 DATA 
8923 208 DATA 
832B 218 DATA 
8333 220 DATA 
833B 230 DATA 
8343 248 DATA 
834B e5Bd DATA 
8953 268 DATA 
BSS5B 278 DATA 
8363 288 DATA 
8356B 2938 DATA 
89373 388 DATA 
837B 3108 DATA 
8983 328 DATA 
838BB 3380 DATA 
8393 348 DATA 
839B 358 DATA 
89A3 360 DATA 
B3AB 378 DATA 
83B3 388 DATA 
83BB 398 DATA 
83C3 4082 DATA 
BSCB 4180 DATA 
89D3 428 DATA 
B3DB 438 DATA 
839E3 448 DATA 
89EB 458 DATA 
89F3 468 DATA 
B8IFB 478 DATA 
BAD3 480 DATA 
BABB : 498 DATA 
8rl3 598 DATA 
BAIB 518 DATA 
8A23 528 DATA 
BA2B 538 DATA 
8A33 S4d DATA 
BA3B 558 DATA 
BAH3 568 DATA 
BAHB 572 DATA 
BAS3 588 DATA 
BASB 598 DATA 
BAG3 602 DATA 
BAGB 618 DATA 
873 6220 DATA 
BA7B 638 DATA 
BAB3 642 DATA 
BABB 650 DATA 
8A33 668 DATA 
BASB 6720 DATA 
BAA3 688 DATA 
BAAB 6938 DATA 
BAB3 788 DATA 
BABB 718 DATA 
BAC3 728 DATA 
BACB 738 DATA 
BAD3 748 DATA 
BADB 758 DATA 
BAE3 768 DATA 
BAEB 778 DATA 
BAF3 788 DATA 
BAFB 730 : DATA 
8503 802 DATA 
BBOB 812 DATA 
8513 822 DATA 
8B1B 8308 DATA 
8B23 848 DATA 
8B2B 852 DATA 
8B33 860 DATA 
B8B3B 878 DATA 
8B43 882 DATA 
BB4B 8390 DATA 
BBS3 928 DATA 
BBSB 310 DATA 
8B63 928 DATA 
BBEB 3308 DATA 
8573 948 DATA 


89,20,1E,RB,A2,00,20,06, 
90,20,97,36,19,08,85,D3, 
A9,00,85,D6,20,6C,ES,as, 
DE,A®,89,28,1E,AB,AS,1F, 
85,03,20,6C,ES,AE,FF,CE, 
EQ,24,90,02,A2,00,8E,39, 
02,BR,20,40,31,4C,60,89, 
D2,FF,BA,AB,20,n2,B3,20, 
DD,BD,20,1E,AB,A9,20,20, 
D2,FF,AE,00,CF,AD,S9,02, 
C9,00,D0,01,AA,EA,BA,20, 
40,91,4C,85,89,D2,FF,8A, 
AB,20,A2,B3,20,DD,BD,2®, 
1E,AB,A9,09,85,03,49,01, 
85,D6,20,6C,E5,n9,E7,AD, 
89,20,1E,AB,A9,1B,85,D3, 
20,6C,ES,EA,EA,EA,EA,En, 
AE,FF,CE,8A,20,40,91,60, 
C3,89,D2,FF,E®,0A,B0,0S, 
A9,20,20,D2,FF,8A,A8,20, 
A2,B3,20,DD,BD,4C,3D,AB, 
A9,18,85,03,85,D6,20,6C, 
ES,A9,EB,A®,89,60,1E,AB, 
48,34,48,41,52,44,43,4F, 
50,59,00,20,20,20,20,20, 
20,20,20,00,20,20,30,00, 
S6,2F,SA,3A,20,42,4C,41, 
45,54,54,45,52,4E,91,00, 
8A,20,CE,34,A0,R9,93,20, 
CA,88,A2,00,A0,00,20,59, 
BA,A9,86,Nd,BA,20,1E,AB, 
A9,AF,AQ,8A,20,1E,AB,Re, 
02,R0,04,20,59,8A,A9,BE, 
AD,BA,20,1E,AB,A9,5D,AD, 
BA,20,1E,AB,A2,14,A0,00, 
20,59, 8R,n9,5D,A9,8n,20, 
1E,AB,A9,EB,AO,8A,20,1E, 
AB,A2,17,R0,00,20,59,8n, 
A9,@A,AQ,BB,4C,1E,AB,AS, 
33,A®,8B,4C,1E,AB,18,4C, 
FO,FF,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,00,46,49,4C,45,4E, 
55,4D,4D,45,52,20,3R,20, 
31,20,20,20,20,20,20,20, 
20,54,52,3A,54,52,41,43, 
4B,20,53,45,34,53,45,4B, 
54,4F,52,00,53,50,45,49, 
43,48,45,52,4C,41,47,45, 
20,3N,00,46,49,4C,45,4E, 
41,4D,45,20,20,20,20,20, 
20,20,20,20,20,42,4C,4F, 
43,4B,53,20,54,59,50,20, 
20,54,52,20,53,45,20,00, 
57,3A,53,43,48,52,45,49, 
42,45,46,45,4B,4C,3A,20, 
41,20,44,20,48,20,52,20, 
53,20,57,20,5E,20,31,2D, 
39,00,20,20,20,20,20,41, 
45,4E,44,45,52,3n,20,52, 
45,54,55,52 ,4E,20,43,55, 
52,53,4F,52,20,49,4E,53, 
54,20,44,45,40,29,46,20, 
55,20,54,20,5E,20,00,00, 
55,34,53,43,48,55,45,54, 
5A,45,4E,20,20,20,46, 3A, 
46,52,45,49,47,45 42,45, 
4E,20,20,20,5E,3A,5A,55, 
52,55,45,43,4B,00,45,43, 
4B,42,4C,41,45,54,54,45, 
52,4E,20,20,20,20,20,20, 
S6,3A,56,4F,52 ‚42 ,4C,41, 
45,54,54,45,52,4E,00,48, 


s 


BB7B 
8B83 
8BBB 
8533 
8B3B 
8BA3 
BBAB 
8BB3 
BBBB 
B8BC3 
BBCB 
8BD3 
BBDB 
8BE3 
BBEB 
8BF3 
BBFB 
8C23 
BCOB 
8C13 
BC1B 
8C23 
BC2B 
8C33 
8C3B 
8C43 
BC4HB 
8653 
BCSB 
8663 
BC6EB 
8C73 
8C7B 
8C83 
BCBB 
8C33 
BCSB 
BCA3 
BCAB 
8CB3 
BCBB 
8CC3 
BCCB 
8CD3 
8CDB 
BCE3 
BCEB 
BCF3 
BEFB 
8003 
BDOB 
8D13 
8D1B 
8D23 
BD2B 
8033 
BD3B 
8D43 
8D4B 
8053 
BDSB 
8D63 
BDEB 
8D73 
8D7B 
8083 
8DBB 
8093 
B8DSB 
BDA3 
BDAB 
8DB3 
8DBB 
8DC3 
8DCB 
8DD3 
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DATA 
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DATA 


3A,48,41,52,44,43,4F,50, 
59,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
SE,3A,5A,55,52,55,45,43, 
4B,00,48,20,82,82,68,85, 
4D,68,85,4C,28,1E,AB,#9, 
01,85,D6,49,200,85,03,20, 
6C,ES,A9,BC,A9,8B,4C,CB, 
8B,53,59,45,49,43,48B,45, 
52,4C,41,47,45,20,3A,0®, 
290,1E,AB,A9,18,85,D6,%9, 
02,85,03,20,6C,E5,49,E®, 
AD,BB,4C,1E,AB,S4,3A,53, 
590,45,49,43,48,45,52,4C, 
41,47,45,20,41,4E, 54,45, 
49,47,45,4E,08,CA,DO,1C, 
AO,24,AD,24,AS,20,CC,FF, 
4C,16,8C,20,F7,B7,A5S,14, 
18,69,01,85,B2,AS,15,69, 
00,85,B3,A9,00,85,17,85, 
AB,85,B2,85,A6,85,19,n9, 
OF,A2,08B,AB,20,BA,FF,A9g, 
00,20,BD,FF,290,C0,FF,n9, 
02,A2,08,A8,20,BA,FF,nA9g, 
01,R2,91,A0,8D0,20,BD,FF, 
280,C0,FF,EA,EA,EA,EA,EA, 
AQO,03,B1,9E,85,F7,CB,B1, 
9E,85,F8,EA,EA,EA,EA,EA, 
AS,F7,C9,00,F0,78,C9,24, 
B9,30,C9,12,B9,09,A5,FB, 
C9,15,B0,26,4C,F8,8C,C9, 
19,B0,909,45,F8,C9,13,B®, 
19,4C,F8,8C,C9,1F,B0,09, 
AS,F8,C9,12,B0,0C,4C,F8, 
8C,AS,F8,C9,11,B0,03,4C, 
F8,8C,A49,01,85,06,99,0E, 
85,03,20,6C,ES,A4,B2,nS, 
A6,84,63,85,62,A2,90,38, 
20,49,BC,20,0D,BD,20,1E, 
AB,E6,03,A9,2D,20,D2,FF, 
A4,A7,AS,AB,84,63,85,62, 
A2,90,38,20,49,BC,20,DD, 
BD,20,1E,AB,A9,0F,20,C3, 
FF,A9,02,4C,C3,FF,AS,n7, 
18,65,F8,85,A7,AS,nRB,69, 
00,85,A8,C6,AB,A5,A7,38, 
E9,01,85,17,A5,A8,E9,00, 
85,A8,4C,95,8C,20,22,8D, 
AS,A7,18,69,FE,85,A7,AS, 
AB,69,00,85,AB,4C,5B,8C, 
A2,0F,20,C9,FF,A9,1A,A®, 
8D,20,1E,AB,4C,CC,FF,42, 
2D,50,20,32,20,30,00,n2, 
0F,20,C9,FF,AS,F7,20,84, 
8D,8E,7F,8D,8D,80,8D,#5S, 
F8,20,84,80,8E,82,8D,8D, 
83,8D0,A2,00,8D,78,8D,20, 
D2,FF,E8,E0,0C,D0,F5,20, 
CC,FF,20,08,80,R2,02,20, 
C6,FF,20,CF,FF,85,F7,20, 
CF,FF,85,F8,A5,A9,C9,00, 
D9,10,E6,A9,20,CF,FF,85, 
B2,85,A7,20,CF,FF,B5,A6, 
85,AB,4C,CC,FF,55,31,20, 
32,20,30,29,31,38,20,31, 
38,A2,30,38,E3,0A,990,03, 
E8,B0,F9,69,3A,60,23,20, 
75,95,4C,AE,A7,CA,DO,24, 
20,D0,30,A5,4C,85,14,95, 
4D,85,15,20,13,A6,B0,0S, 
A2,09,4C,2B,81,A5,5F,38, 
E9,01,85,7A,A5,69,E9,080, 
85,7B,38,60,CA,D®,21,20, 
6A,8C,38,20,52,96,A4,390, 
D2,10,45,33,D0,02,C6,34, 
C6,33,20,'CF,FF,91,33,4C, 
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C9,80,20,7F,97,4C,1E,32, 
CA,D®,32,20,6N,8C,18,20, 
52,936,45,35,85,49,11,85, 
D6,A9,21,85,D3,4C,6C,ES, 
C6,55,C6,54,B1,49,00,85, 
FA,85,FC,85,FD,A9,C0,85, 
FB,A2,08,A0,00,B1,FA,C9, 
2E,D®,1C,E®,05,00,0B,C®, 
2A,30,07,C0,3F,B®,03,4C, 
32,8E,AS,FC,18,69,01,85, 
FC,AS,FD,69,00,85,FD,C8, 
DO,DB,E6,FB,CA,D®,D4,AS, 
FC,38,E9,04,85,FC,A5,FD, 
E9,00,85,FD,n9,98,38,ES, 
FC,85,FA,A9,02,ES,FD,8S, 
FB,A9,11,85,06,49,23,85, 
D3,AS,FD,C9,01,B0,10,nS, 
FC,C9,64,B0,0A,E6,D3,n5S, 
FC,C9,04,B0,02,E6,03,20, 
6C,ES,A4,FC,A5,FD,84,63, 
85,62,12,90,38,20,49,BC, 
20,0D,BD,20,1E,AB,A9,®F, 
85,D6,49,23,85,D3,A5,FB, 
C3,01,B0,10,45,Fn,C9,64, 
BO,OA,E5,D3,A5,FA,C9,on, 
BO,02,E6,03,20,6C,E5,A4, 
FA,AS,FB,84,63,85,62,n2, 

.930,38,28,49,BC,20,DD,BD, 
4C,E0,31,2®,1E,AB,A9,OF, 
85,06,49,21,85,03,20,6C, 
ES,A9,E1,A®,BE,2@,1E,AB, 
A9S,21,85,03,20,F0,80,#9, 
EB,AB,BE,4C,E®,91,2A,3D, 
20,20,20,20,00,2E,3D,20, 
20,20,20,00,31,A5,4C,BD, 
34,39, 24;48,10,03,20,CE, 
34,38,69,24,48,19,00,85, 
FE,A93,33,20,D2,FF,A9,®1, 
A2,87,AD,8F,20,BD,FF,A3, 
01,n2,08,10,00,20,BA,FF, 
20,C0,FF,A2,01,20,C6,FF, 
20,CF,FF,2®,CF,FF,20,CF, 
FF,20,CF,FF,20,CF,FF,BS, 
FA,20,CF,FF,AG,FA,20,CD, 
BD,20,CF,FF,A6,30,F0,08B, 
20,CC,FF,A9,01,4C,C3,FF, 
20,D2,FF,C9,22,D0,EA,2®, 
CF,FF,20,D2,FF,C9,00,D0, 
F6,E6,FE,AS,FE,C9,19,D®, 
1B,20,CC,FF,20,E4,FF,C9, 
0D,D®,F9,AR9,933,20,D2,FF, 
A9,00,85,FE,A2,01,20,C6, 
FF,4C,29,8F,A9,0D,20,D2, 
FF,4C,29,8F,24,60,CA,D®, 
GE,24,48,10,10,20,EE,390, 
86, 4E,BA,0A,0A,65,4E,69, 
04,85,4E,38,60,A5,7A,4B, 
AS,7B,48,49,23,N0,01,85, 
7A,84,7B,n2,FF,86,4E,20, 
75,95,20,73,00,20,F3,BC, 
A2,38,A0,99,20,D4,BB,20, 
75,95,A6,4E,A®,FF,EB,CB, 
B9,38,99,E0,03,B0,05,95, 
4B.4C.C9,8F,3D,58,01,C®. 
04,D0,EB,86,4E,20,79,0®, 
F0,0D,C9,2C,F0,C9,68,85, 
7B,68,85,7A,4C,4D,96,68, 
85,7B,68,85,7A,38,60,Cn, 
F®,03,4C,D3,8C,20,FD,AE, 
20,3E,B7,20,34,90,85,BB, 
18,69,80,85,B3,49,00,85, 
BB,A6,BB,A4,BB,BD,FF,CE, 
85,B2,20,10,30,4C,5D,30, 
A2,31,85,D3,84,B8,20,68, 
90,A5,B2,20,3C,03,4C,5D, 
30,49,00,85,FA,A9,04,85, 
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FC,A9,A0,85,FB,8A,60,HE, 
E8,D3,4C,4E,30,C9,64,B®, 
02,E6,D3,E6,D3,R4,B2,20, 
A2,B3,28,DD,BD,2@,1E,AB, 
ES,BB,E6,BB,AS,BB,C5,B3, 
DO,AF,60,22,92,AS,B2,An, 
29,80,4A,85,FE,BA,29,3F, 
05,FE,85,FE,A9,00,85,FC, 
A9,04,85,FD,A®,00,A5,FC, 
18,69,28,85,FC,AS,FD,69, 
00,85,FD,C8,C4,D6,D®,EE, 
A4,D3,A5,FE,31,FC,60,04, 
04,04,04,04,04,84,9B,86, 
SC,A2,00,86,NB,A2,30,86, 
AS,86,A6,86,47,R2,20,C9, 
on,B0,07,86,15,86,n6,4C, 
EA,S0,C9,564,B0,05,86,45, 
4C,D2,30,C9,64,90,08,E6, 
AS,38,E9,64,4C,C6,30,C3, 
On,B®,08,A4,A5,C0,01,B®, 
OE,86,456,C9,0n,90,08,E6, 
AG,38,E9,04,4C,DE,30,C9, 
01,30,08,E6,17,38,E9,®1, 
4C,EnR,30,A4,FA,AS,B2,AN, 
29,80,4A,85,FE,8N,29,3F, 
05,FE,31,FB,B9,37,391,A8, 
AS,AS,31,FB,C8,AS,A6,91, 
FB,C8,A5,A7,31,FB,E6,FA, 
AS,FA,C9,08,D8,11,A5,FB, 
18,69,28,85,FB,A5,FC,69, 
00,85,FC,R9,00,85,FA,n6, 
SC,A4,3B,60,09,00,11,15, 
19,1D,21,25,1B,A2,00,86, 
AB,A2,30,86,A5,86,A6,86, 
A7,A2P,20,C9,0R,B0,07,86, 
AS,86,A6,4C,86,91,C9,64, 
BO,05,86,A5,4C,6E,31,C9, 
64,30,08,E6,45,38,E9,64, 
4C,62,31,C3,0R,B0,08,R4, 
AS,CD,01,B8,0E,86,A6,C9, 
DA,SO,08,E6,46,38,E9,Dn, 
4C,7A,31,C9,01,390,08,E6, 
A7,38,E3,01,4C,86,31,#9, 
AS,AD,00,4C,1E,AB,20,FD, 
AE,20,3E,B7,86,16,86,BB, 
EO,13,30,06,84,38,E39,12, 
85,BB,20,FD,AE,20,39E,B7, 
86, FE,A9,15,A6,A6,E®, 12, 
90,0E,49,13,E0,19,30,08, 
A9,12,E0,1F,90,02,A9,11, 
85,3E,R9,00,85,A7,20,56, 
80,E6,A7,AS,A7,C5,39E,D®, 
FS,60,4C,AF,87,4C,1E,AB, 
A9,14,85,03,49,18,85,D6, 
20,6C,E5,A9,F5,A0,31,4C, 
1E,AB,42,2F,46,3A,54,5P, 
41,43,4B,00,02,06,07,00, 
A9,00,85,FA,85,FC,A0,CDO, 
84, FB,84,FD,A2,10,A0,00, 
91,FC,C8,D®,FB,E6,FD,C#, 
DO,F8,4C,99,87,06,07,20, 
FD,AE,20,9E,B7,86,FE,ne, 
FE,BD,FF,CE,E8,39D,FF,CE, 
CA,F®,05,CA,E4,FE,BO,F1, 
AB,FE,A9,00,90,FF,CE,RB, 
B3,4C,06,90,20,FD,AE,20, 
SE ,B7,86,FE,EA,EA,BD,FF, 
CE,CA,SD,FF,CE,E8,E8,E®, 
00,00,F3,A2,FF,A9,00,3D, 
FF,CE,A6,B3,4C,06,30,8®, 
DO,FS,60,C8,C9,20,FD,AE, 
20,3E,B7,E0,01,00,0C,n3, 
C4,85,FB,A9,C6,80,B6,32, 
4C,BF,92,49,C0,85,FB,A9, 
C2,80,B6,92,49,00,85,Fn, 


A9,RQ,8B5,FC,A9,04,85,FD, 
A2,00,AB,00,B1,FA,Sı,FC, 
C8,00,F9,E8,E0,02,F0,07, 
E6,FB,E6,FD,4C,3D,32,R2, 
002,BD,AQ,C6,3D,AB,06,EB, 
EO,80,D0,F5,60,20,E0,32, 
C9,80,90,0B,20,1C,93,88, 
20,1A,93,88,20,1A,33,20, 
EO,92,20,14,93,88,20,12, 
93,88,4C,12,33,20,FD,AE, 
20,9E,B7,A9,A0,85,FA,As, 
04,85,FB,E0,08,30,15,#S, 
FA,18,69,28,85,FA,AS,FB, 
69,00,85,FB,8N,38,E9,08, 
AA,4C,EE,32,BD,37,91,A8, 
C8,CB,En,EA,Bl,FA,60,B1, 
FA,18,69,88,91,FA,60,B1, 
FA,38,E9,80,31,FA,60,60, 
SF,A9,93,20,Ch,88,A9,02, 
A2,00,85,06,86,03,20,6C, 
ES,A9,A5,N®,94,20,1E,AB, 
A9,00,A2,00,85,06,86,D3, 
20,6C,E5,A9,CB,A0,393,20, 
1E,AB,A9,14,A2,00,85,D6, 
86,03,20,6C,ES,A49,7C,A®, 
94,20,1E,AB,A9,01,A2,00, 
85,06,86,03,20,6C,E5,A9, 
EB,A0,33,20,1E,AB,A9,03, 
A2,00,85,06,86,03,28,6C, 
ES,A9,7C,A®,34,20,1E,AB, 
A9,15,A2,01,85,D6,86,D3, 
20,6C,E5,A9,07,n0,34,20, 
1E,AB,4C,A7,93,01,85,D6, 
86,03,20,6C,ES,A9,2E,Ro, 
94,20, 1E,AB,A9,17,R2,01, 
85,06,86,03,20,6C,ES5,#9, 
55,A0,94,20,1E,AB,A9,17, 
A2,21,85,06,86,03,20,6C, 
ES,A9,22,En,En,4C,D2,FF, 
53,45,4B,54,4F,52,20,3#A, 
20,20,20,20,20,20,20,20, 
20,49,4E,50,55,54,20,53, 
45,4B,54,4F,52,20,34,00, 
42,59,54,45,4E,52,2E,3n, 
20,20,20,20,20,20,20,20, 
20,42,59,54,45,57,45,52, 
54,3A,20,00,42,45,46,45, 
48,4C,3A,20,41,20,43,20, 
46,20,4C,20,4E,20,52,20, 
53,20,56,20,57,20,5n,20, 
SE,20,23,20,24,20,31,2D, 
39,20,00,18,A2,01,A0,08, 
20,F®,FF,AB®,1F,A9,20,20, 
D2,FF,88,D®,FA,4C,F8,75, 
29,20,4C,3A,4C,45,54,5n, 
S4,45,52,20,42,4C,4F,43, 
4B,00,41,45,4E,44,45,52, 
3A,20,43,55,52,53,4F,52, 
20,49,4E,53,54,20,44,45, 
4C,20,5A,20,5E,20,23,20, 
24,20,20,20,31,2D,39,20, 
00,2D,2D,2D,2D,2D,20,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,00,45,4C,4F,50,50,59, 
20,3n,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,00,5E,3A,5A,55,52,55, 
45,43,4B,00,20,FD,AE,20, 
SE,B7,E®,01,F0,08,A9,32, 
8D,7D,35,4C,EE,94,A9,31, 
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80,70,95,86,FA,20,FD,AE, 
20,3E,B7,84,20,30,95,6£, 
83,35,80,84,95,20,FD,RE, 
20,9E,B7,8A,20,30,55,8E, 
86,95,80,87,95,A9,0F,A2, 
08,A8,20,BA,FF,A9,00,20, 
BD,FF,20,C0,FF,A9,02,R2, 
08,A8,20,BA,FF,A9,01,R2, 
88,A0,95,20,BD,FF,20,CD, 
FF,AS,FA,C9,01,F®,03,4C, 
56,95,20,90,95,20,B3,35, 
A2,02,20,C6,FF,A2,00,20, 
CF,FF,9D,FF,CE,E8,D®,F7, 
4C,6F,95,20,B3,95,A2,02, 
20,C9,FF,A2,00,BD,FF,CE, 
20,D2,FF,E8,D0,F7,20,CC, 
FF,20,90,95,20,CC,FF,A9, 
02,20,C3,FF,A9,0F,4C,C3, 
FF,55,31,34,32,20,30,20, 
30,31,20,30,30,23,42,2D, 
50,20,32,20,30,n2,30,38, 
E9S,0n,90,03,E8,B0,F9,69, 
3A,60,A2,0F,20,C9,FF,A2, 
00,BD,7C,35,20,D2,FF,E8, 


-EO,20C,D®,FS,20,CC,FF,60, 


A2,OF,20,C9,FF,A2,00,BD, 
89,95,20,D2,FF,E8,E0,07, 
D0,FS,20,CC,FF,60,20,20, 
FD,AE,20,9E,B7,8N,48,20, 
FD,AE,20,9E,B7,68,A8,18, 
20,FO,FF,20,FD,AE,4C,R4, 
AA,20,FD,AE,20,3E,B7,86, 
B2,20,FD,AE,20,9E,B7,86, 
FD,A9,04,85,D6,E0,08,90, 
OA,8R,38,E9,08,AA,E6,D6, 
4C,F8,95,BD,37,91,85,03, 
20,6C,ES,A5,B2,20,40,931, 
AS,CE,85,FB,A9,FF,85,Fn, 
AS,FD,18,65,B9,A8,A5,Be, 
91,FA,60,E6,03,E6,D3,4C, 
33,96,C9,64,B0,02,E6,D3, 
AS,D3,85,BA,20,6C,E5,n4, 
B2,20,A2,83,20,DD,BD,85, 
FA,84, FB,AS,FA,C9,00,F®, 
3B,C6,FA,A®,00,R9,12,91, 
FA,AS,FA,A4,FB,20,1E,AB, 
AS,B2,C9,64,B0,25,A5,Bn, 
38,E5,B8,85,B7,A5,B8,85, 
D3,45,B9,85,D6,E6,03,20, 
6C,ES,AS,12,20,D2,FF,AD, 
00,R9,20,20,D2,FF,CB,C4, 
B7,D®,F6,60,9,FF,85,Fn, 
C6,FB,4C,50,96,12,20,20, 
20,32,00,06,19,02,85,06, 
A9,08,85,03,20,6C,ES,#9, 
D8,A0,96,20,1E,AB,R9,02, 
85,D6,19,08,85,03,A9,0F, 
A2,08,AB,20,BA,FF,A9,00, 
20,BD,FF,20,C0,FF,A2,®F, 
20,C6,FF,2®,CF,FF,20,D2, 
FF,24,90,50,F6,20,CC,FF, 
A9,0F,4C,C3,FF,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,20,00,20,29, 
13,37,38,E9,80,31,FA,88, 
B1,FA,38,E9,80,31,FA,88, 
Bl,FA,38,E93,80,91,FA,60, 
20,FD,AE,20,3E,B7,BD,3A, 
30,85,FC,A9,04,85,FB,A9, 
00,85, FA,A®,00,AS,FA,1ı8, 
69,28,85,FA,A5S,FB,69,00, 
85,FB,C8,C4,FC,D®,EE,BD, 
22,91,A8,C8,C8,C8,C8,B1, 
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9753 
975B 
9763 
976B 
9773 
977B 
9783 
978B 
9793 
9739B 
97A3 
97AB 
97B3 
97EB 
97C3 
97CB 
9703 
97DB 
I7EI 
S7EB 
97F3 
97FB 
9803 
9808 
9813 
9B1B 
9823 
s82B 
9833 
983B 
9843 
984B 
9853 
S85B 
9863 
.9B6B 
9873 
9387B 
3883 
988B 
9833 
983B 
g8A3 
S8AB 
9883 
SBBB 
98C3 
SBCB 
98D3 
98DB 
98E3 
9BEB 
98F3 
98FB 
99983 
990B 
9313 
991B 
9923 
932B 
33933 
933B 
9343 
994B 
9953 
935B 
3363 
996B 
9373 
9937B 
9983 
938B 
3333 


4748 
4750 
4760 
4770 
4788 
4790 
4808 
4810 
48208 
4830 
4B4® 
4850 
4860 
4870 
4BB® 
4890 
43008 
4910 
4920 
4938 
4349 
4958 
4968 
4370 
4980 
4338 
=], 141%) 
Sse1® 
50228 
5032 
5249 
5052 
5868 
59070 
5882 
5239 
5128 
5118 
5128 
5138 
5148 
5158 
5168 
5178 
5188 
5158 
5298 
5210 
s228 
5238 
5248 
5250 
5268 
5278 
5288 
5298 
5308 
5310 
53208 
5330 
5340 
5358 
5368 
5370 
5388 
5338 
5408 
5410 
5420 
5438 
Ss440 
5458 
5468 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


‘DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


FA,60,4E,A9,33,20,CA,B8, 
A9,00,R2,00,85,D6,86,D3, 
20,6C,E5,A9,DB,A0,97,20, 
1E,AB,A9,14,A2,00,85,D6, 
86,03,20,6C,E5,A9,84,A0, 
98,20,1E,AB,A9,01,A2,00, 
85,06,86,03,20,6C,E5,#3, 
FB,A0,37,20,1E,AB,A9,03, 
A2,00,85,06,86,D3,20,6C, 
ES,nR9,84,10,98,20,1E,AB, 
A9,15,R2,01,85,06,86,D3, 
20,6C,E5,A9,16,A0,98,4C, 
A4,93,09,16,A2,01,85,D6, 
86,03,20,6C,E5,A9,3E,n®, 
98,20,1E,AB,A9,17,A2,01, 
85,06,86,03,20,6C,E5,n9, 
5F,AO,98,20,1E,AB,A9,18, 
A2,01,85,06,86,03,20,6C, 
ES5,A9,AD,AB,38,4C,1E,NB, 
50,55,46,46,45,52,20,3n, 
20,20,20,20,20,20,20,20, 
20,49,4E,50,55,54,2D,50, 
55,46,46,45,52,20,3N,00, 
42,59,54,45,4E,52,2E,34, 
20,20,20,20,20,20,20,00, 
20,42,59,54,45,57,45,52, 
54 ,30,00,42,45,46,45,48, 
4C,3A,20,41,20,43,20,45, 
20,48,20,52,20,53,20,56, 
20,57,20,54,20,5E,20,23, 
20,24,20,31,2D,39,20,20, 
00 ,4E,00,B1,45,C9,00,F®, 
04,C9,A0,D0,10,n9,22,20, 
E3,7F,A9,20,20,E3,7F,C8, 
CO,15,09,F8,60,20,E3,7F, 
C8,C0,15,D®,DE,A9,22,4C, 
E3,7F,46,46,45,52,20,4C, 
45 53,45 ,4E,20,20,20,20, 
20,20,20,55,2F,5A,3n,42, 
4C,41,45,54,54,45,52,4E, 
02,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,2D,2D,2D,2D,20, 
2D,2D,2D,2D,2D,2D,2D,eD, 
2D,00,SE ,3R,5h,55,52,55, 
45 ,43,4B,00,20,4D,39,20, 
5F,39,A2,00,86,FD,A9,76, 
AB,S9,20,1E,AB,AS,FA,20, 
D2,FF,AS,FB,20,D2,FF,AS, 
FF,28,D2,FF,20,CC,FF,ne, 
01,20,C6,FF,20,CF,FF,A6, 
FD,SD,FF,CE,E6,FD,AS,FD, 
DO,F2,4C,AD,9A,A9,01,4C, 
C3,FF,20,4D,99,20,5F,39, 
A2,00,86,FD,86,FE,A9,00, 
85,FC,A9,7A,A0,39,20,1E, 
AB,AS,FA,20,D2,FF,AS,FB, 
20,D2,FF,A9,20,20,D2,FF, 
A6,FD,BD,FF,CE,20,D2,FF, 
ES,FC,E6,FD,AS,FC,C9,20, 
D®O,EE,20,CC,FF,A2,01,20, 
C9,FF,AS,FA,18,69,20,85, 
FA,AS,FB,69,00,85,FB,E6, 
FE,AS,FE,C9,08,D®,B7,4C, 
ED,938,20,FD,AE,20,8A,AD, 
20,F7,B7,AS,14,A6, 15,85, 
FA,86,FB,60,49,01,n2,08, 
AD,OF,20,BA,FF,A9,00,020, 


BD,FF,20,C0,FF,n2,01,20, 


CS,FF,60,4D,2D,52,00,4D, 
2D,57,00,01,20,C3,FF,560, 
4D,2D,52,00,4D,2D,57,00, 
2D,57,00,FF,C0,A9,33,20, 
CA,88,R9,00,12,00,85,D6, 
86,D3,20,6C,E5,49,25,r0, 
gA,20,1E,AB,A9,14,A2,00, 
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39AB 
99B3 
93BB 
93C3 
93CB 
3303 
93DB 
99E3 
S3EB 
93F3 
93FB 
g9AD3 
9ADB 
9rA13 
gA1B 
gA23 
gA2B 
9R33 
gA3B 
gA43 
SA4B 
g9AS3 
9ASB 
9A63 
9AGB 
9A73 
9A7B 
g9A8B3 
9ABB 
g9A33 
gASB 
gAA3 
SAAB 
9AB3 
SABB 
sac3 
SACB 
gAD3 
SADB 
SAE3 
SAEB 
SAF3 
SAFB 
9823 


SBOB 
9B13 
9B1B 
3B23 
SB2B 
9833 
SB3B 
9B43 
9B4B 
9B53 
SBS5B 
9B63 
SBEB 
9B73 
9B7B 
9B83 
SBBB 
9B93 
9BSB 
9BA3 
9BAB 
9BB3 
SBBB 
IBcH9 
9BCB 
9BD3 
SBDB 
SBE3 
SBEB 
9BF3 
9BFB 
9C23 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DaTa 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
bAaIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


85,06,86,03,20,6C,E5,n9, 
FD,A®,74,20,1E,AB,A9,01, 
A2,00,85,D6,86,03,20,6C, 
ES,A9,45,ADd,3A,20,1E,AB, 
A9,03,n2,00,85,D6,86,D3, 
20,6C,E5,A9,FD,A0,74,4C, 
90,37,09,15,A2,01,85,D6, 
86,03,20,6C,ES,A9,60,RD, 
SA,20,1E,AB,A9,16,A2,01, 
85,06,86,03,20,6C,E5,A9, 
88,AD,3A,20,1E,AB,A9,17, 
A2,01,85,06,86,D3,20,6C, 
ES,A9,A9,AD,3A,20,1E,AB, 
AS,18,A2,01,85,06,86,D3, 
20,6C,E5,n9,F7,A®,9A,4C, 
1E,AB,41,44,52,45,53,53, 
45,3A,20,20,20,20,20,20, 
20,20,20,49,4E,50,55,54, 
2D,41,44,52,45,53,53,45, 
3A,00,42,59,54,45,4E,S2, 
2E,3A,20,20,20,20,20,20, 
20,20,20,42,59,54,45,57, 
45,52,54,34,00,C3,30,D®, 
03,4C,EF,75,AS,FA,C9,01, 
F0,03,4C,02,76,10,00,n3, 
00,31,FB,C8,D8,FB,20,E4, 
FF,F®O,FB,4C,2E,34,45,4E, 
44,45,52,4E,08,28,C0,FF, 
A2,7E,20,C9,FF,A9,0D,20, 
D2,FF,A5,30,C9,80,60,01, 
60,4C,ED,86,53,3A,57,45, 
43,48,53,45,4C,00,31,2D, 
39,3A,29,CC,FF,AS,FA,18, 
69, FF,85,FA,AS,FB,69,00, 
85,FB,20,70,39,49,76,r0, 
99,29, 1E,AB,AS,FA,20,02, 
FF,AS,FB,28,D2,FF,20,CC, 
FF,A2,01,20,C6,FF,20,CF, 
FF,8D,FE,CF,28,CC,FF,4C, 
FO,38,2D,2D,2D,2D,20,2D, 
2D,2D,2D,2D,2D,2D,2D,2D, 
2D,2D,2D,08,5E,3A,54,55, 
52,55,45,43,4B,00,FF,20, 
19,98, 20,25,3C,A2,20,A®, 
C4,20,83,90,20,0E,SC,r2, 
02,A0,CO,4C,B3,3D,A9,0F, 
A2,08,A8,20,BA,FF,A9,20, 
20,BD,FF,20,C0,FF,A9,02, 
A2,08,AB,20,BA,FF,A9,01, 
A2,F9,RAB,3B,20,BD,FF,eo, 
CO,FF,A2,0OF,20,C9,FF,ns, 
FA,AQ,SB,20,1E,AB,20,CC, 
FF,A2,0F,20,C9,FF,A9,06, 
AD,SC,20,1E,AB,20,CC,FF, 
A2,02,20,C6,FF,A2,00,20, 
CF,FF,28,CF,FF,SD,00,C8, 
E8,20,CF,FF,3D,00,C8,EB, 
20,CF,FF,3D,00,C8,E8,E®, 
69,D0,E4,20,CC,FF,A9,02, 
20,C3,FF,A9,0F,20,C3,FF, 
A9,C8,85,FB,A9,C9,85,FD, 
A9,00,85,FR,85,FC,A9,00, 
85,B6,1n9,F1,85,47,n9,38B, 
85,18,20,B1,3B,E6,B6,45, 
B6,C9,23,D®,F5,60,n2,00, 
ADO,00,B1,Fn,85,FE,AS,FA, 
18,69,01,85,Fh,AS,FB,69, 
VB,U5,FB,RAB,BV,BL,RA/,ch, 
FE,D1,17,D90,05,A9,2n,4C, 
D7,9B,A9,2E,31,FC,C8,C®, 
08,D0,EA,AS,FC,18,69,08, 
85,FC,A5,FD,69,00,85,FD, 
EB,E0,03,D0,C3,60,01,02, 
04,08,10,20,40,80,23,55, 
31,20,32,20,30,20,31,38, 
20,30,00,42,2D,50,20,3e, 
20 ,34,00,R9,C9,85,FB,R9, 


62608 
6278 
6282 
6298 
6328 
6310 
6328 
6338 
6348 
6350 
6360 
6370 
6388 
6390 
6499 
6410 
6420 
6439 
6440 
6450 
6468 
6470 
5480 
6490 
6598 
6512 
65208 
6539 
6549 
6559 
6568 
6570 
6582 
6599 
6600 
6618 
6620 
66308 
6640 
6650 
6662 
6670 
6688 
65639 
6728 
6710 
6720 
6730 
6748 
6750 
6760 
6778 
6788 
6790 
6892 
» 6818 
6828 
6839 
6840 
6859 
6868 
6870 
6880 
6898 
6302 
6310 
6920 
6339 
6949 
6359 
6968 
63978 
6982 
6330 
7908 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


00,85,FA,A9,01,85,89,A9, 58 
13,85,B8,A2,00,86,B7,4C, 8A 
39,3C,A3,CA,85,FB,A9,Bd, 98 
85,FA,A9,13,85,B9,49,24, 72 
85,B8,A2,12,86,B7,49,33, 42 
20,CA,88,A9,01,85,03,A3, DE 
01,85,D6,20,6C,E5,A9,A8, Co? 
AD,SD,20,1E,AB,A9,05,85, 87 
D3,A9,16,85,D6,28,6C,Es, FB 
A9,59,AQ,3D,20,1E,AB,A9, 56 
05,85,D3,A9,18,85,06,20, F3 
6C,ES,A9,70,A0,3D,4C,83, 8C 
SC,A9,05,85,D3,49,18,85, 31 
D8,20,6C,E5,A9,A9,A0,SD, 40 
PO,1E,AB,N9,21,85,D3,49, CA 
08,85,06,20,6C,ES,A9,#9, CO 
ADO,SD,20,1E,AB,A3,21,85, A3 


D3,AS,0B,85,D6,20,6C,ES, ED 


A9,92,A0,90,20,BE,8E,AS, 61 
21,85,03,49,20,85,06,20, 04 
6C,ES,A9,99,AB,30,20,1E, SD 
AB,A9,01,85,06,A9,0A,85, 31 
D3,20,6C,E5,A9,20,A8,30, CS 
20,1E,AB,A6,B7,A9,02,85, 
D6,E6,D6,A9,05,A4,8B9,C0, 
0A,30,03,38,E9,01,85,D3, 
86,B7,20,6C,E5,A4,B9,20, 
A2,B3,20,0D,BD,20,1E,AB, 
A6,B7,E6,03,E6,03,E6,D3, 
AO,00,B1,FA,20,D2,FF,C8, 
98,00,36,90,08,F4,A5,Fa, 
18,69,18,85,FA,AS,FB,69, 
00,85, FB,E8,E6,B9,A5,59, 
C5,88,00,B5,60,30,31,32, 
33,34,35,36,37,38,39,30, 
31,32,33,34,35,36,37,38, 
39,30,00,15,15,15,15,15, 
15,15,15,15,15,15,15,15, 
15,15,15,15,13,13,13,13, 
13,13,13,12,12,12 12,12, 
12,11,11,11,11,11,42,4s, 
46,45,48,4C,3N,20,41,20, 
48,20,52,20,53,20,57,20, 
SE,20,20,20,00,41,45,4E, 
y4,45,52,3A,20,43,55,52, 
53,4F,52,290,12,2n,92,20, 
12,2E,92,20,42,20,46,20, 
SE,20,20,20,20,20,00,24, 
3A,46,52,45,45,00,2E,3n, 
55,53,45,44,00,53,45,4B, 
54,4F,52,45,4E,00,42,4C, 
4F,43,4B,53,3A,290,20,00, 
B6,FA,84,FB,A9,04,85,FD, 
A9,00,85,FC,A2,00,A0,00, 
B1,FC,31,FA,C8,D®,F9,E6, 
FB,E6,FD,E8,E0,04,DO,EE, 
60,8A,20,16,E7,4C,A3,3D, 
20,B1,20,FD,AE,20,3E,B7, 
BE,30,03,20,FD,AE,20,SE, 
B7,EO,00,00,13,A9,30,8D, 
5SC,03,8D0,5E,03,A9,3R,8D, 
5D,03,8D,5F,03,4C,17,3E, 
A9,20,8D,5C,03,49,80,80, 
5D,03,A9,39F,8D,5E,03,49, 
A1,8D,5F,03,20,FD,AE,20, 
9E,B7,8E,70,03,20,FD,AE, 
20,3E,B7,AC,70,03,18,20, 
FO,FF,20,FD,AE,20,3E,B7, 
BE,SA,03,10,00,84,B4,20, 
4F,9E,C9,0D,F®,0B,A6,B4, 
3D,B®,3F,E8,86,B4,4C, 3A, 
9E,4C,AA,SF,AS,D3,8D,60, 
03,85,CA,AS,D6,BD,61,03, 
85,C9,38,48,BA,48,A5,D9, 
FO,0E,4C,3A,E6,20,8E,9F, 


SE6B 
9E73 
9E7B 
9E83 
9EBB 
9ES3 
9ESB 
9EA3 
gEAB 
SEB3 
9EBB 
9EC3 
SECB 
SED3 
SEDB 
SEE3 
SEEB 
9EF3 
9EFB 
9F03 
9FOB 
9F13 
9F1B 
9F23 
SF2B 
3F33 
9SF3B 
9F43 
9F4B 
9F53 
SFSB 
SF63 
SFEB 


|'9F73 


9SF7B 
9F83 
SFBB 


| 9F93 


SFSB 
SFA3 
SFAB 
SFB3 
SFBB 


9FC3, 


SFEB 
SFD3 
SFDB 
SFE3 
SFEB 
SFF3 
SFFB 


DATA 38,68,AA,68,AB,A9,00,60, 
DATA AS,D3,85,C9,18,6D,3D,03, 
DATA 85,CA,20,80,9F,58,AS,C6, 
DATA 85,CC,F0,F9,20,B4,ES,CD, 
DATA 5A,23,00,06,80,5B,83,4C, 
DATA BB,3E,AA,C9,0D,F®,1E,20, 
DATA EB,9E,90,0B,20,00,3E,BO, 
DATA DC,AS,D3,C5,CA,B®,D6,20, 
DATA 8E,SF,A9,00,85,04,84,20, 
DATA 16,E7,4C,80,9E,20,8E,SF, 
DATA AS,CA,85,05,AD,60,03,85, 
DATA CA,AD,61,03,85,C9,49,01, 
DATA 85,D0,4C,02,E6,BA,CD,5SC, 
DATA @3,90,06,CD,5D,03,B9,01, 
DATA 60,CD,SE,03,30,06,CD,5F, 
DATA 23,80,01,60,38,60,18,68, 
DATA 84,C9,1D,08,07,AS,03,C5, 
DATA CA,30,F3,60,C9,9D,D0,08, 
DATA AS,D3,C5,C9,D0,E8,38,60, 
DATA 8A,C9,14,00,1F,AS,D3,C5S, 
DATA C9,F®,F3,20,8E,9F,C6,D3, 
DATA 20,5C,E5,A4,D3,C8,B1,D1, 
DATA 88,91,01,C8,C4,CA,30,FS, 
DATA AS,020,38,60,84,C9,34,D0, 
DATA 24,A4,CA,88,B1,D1,C9,20, 
DATA D0,18,C4,03,F0,17,90,15, 
DATA 20,8E,9F,88,B1,D1,C8,31, 
DATA D1,88,C4,D3,00,F5,A9,20, 
DATA 91,01,84,38,60,84,C9,33, 
DATA D®,1B,20,8E,3F,A4,C9,n9, 
DATA 20,91,D1,C8,C4,CA,s0,F9, 
DATA AS,C9,A5,C9,85,03,20,6C, 
DATA ES,A9,00,38,60,84,C9,13, 
DATA F®,02,38,60,20,8E,9F ,4C, 
DATA 63,9F,20,24,EA,A4,C9,AD, 
DATA 86,02,88,C8,91,F3,C4,Ca, 
DATA 30,F9,60,78,84,48,98,48B, 
DATA AS,CF,F®,0C,AS,CE,AE,87, 
DATA 02,20,13,EA,A2,00,86,CF, 
DATA 68,A8,68,AN,60,58,60,60, 
DATA 20,20,20,20,20,31,38,39, 
DATA 32,45,52,55,54,53,43,48, 
DATA 22,22,36,34,53,53,00,20, 
DATA 20,20,20,20,20,20,20,20, 
DATA 20,20,20,00,00,20,20,20, 
DATA 20,20,46,4C,4F,50,50,59, 
DATA 4D,41,53,54,45,52,20,33, 
DATA 2E,C6,85,E3,8C,81,89,ED, 
DATA ED,85,E3,8C,81,46,4C,4F, 
DATA 50,52,45,43,48,45,43,4B, 
DATA 45,52,20,24,43,00,00,00, 


FOR A=34355 TD 40952 STEP 
8:5=-8:C=8:FOR B=-8 TO 7: 
GDSUB 600498 
S=S+H+L-56:6=57255:5=25555 
AND 255:POKE A+B,H+L:NEXT 
B:GOSUB 69948 
F$S="PRUEFSUMME OK”: IF S<> 
H+L IHEN F$="LRUS]J 
PRUEFSUMMENFEHLER”: F=F+1 
GOSUB 68099:NEXT A:PRINT ” 
EDOWNI”F"FEHLER”:END 

READ H$:G0SUB 60858: H=-L* 
16:H$5=MNID$ CH$,2) 

L=ASC CHS+”X”)-48: IF LO 
DR L>22 THEN 62089 

IF L<1® THEN RETURN 
L=L-7:IF L>9 THEN RETURN 
FS="ERUSIEINGABEFEHLER”:L= 
®:F=F+1 

PRINT ”ZEILE” PEEK .(64)* 
ES6+PEEK (639F$: RETURN 


Listing 3: Kombinierter Hexdump-Basiclader von Floppymaster, Teil 2 
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Formatieren in elf 


Disketten im Rohzustand sind nutz- 
lose Scheiben. Erst das Formatie- 
ren bringt sie in Form. Dabei wer- 
den die einzelnen Tracks und Sek- 
toren angelegt. Das Floppykom- 
mando N (New) braucht dazu etwa 
1,5 Minuten. Es geht aber schnel- 
ler: Die meiste Zeit nimmt nämlich 
die aufwendige Verteilung der 
Sektoren auf .die jeweiligen Spu- 
ren in Änspruch. Da aber die Ab- 
stände vom vorhergehenden zum 
folgenden Sektor nahezu gleich 
groß sind, ist es unnötig, sie jedes- 
mal neu zu errechnen. 

Mit dem Programm Speed Format 
kann man eine Diskette in elf Se- 
kunden komplett formatieren. 


Mit Verify und ohne 


Rattern 


Selbst wenn man auf einem (nicht 
unbedingt nötigen) Verifizieren 
besteht, braucht man nicht einmal 
19 Sekunden zu warten. Auch 
wird das Rattern, das über kurz 
oder lang zu einer Dejustage des 
Schreib-Lese-Kopfes führt, durch 
ein kurzes, schonendes Klicken 
ersetzt. 

Das Programm meldet sich mit 
„SPEED FORMAT V1.0". Nun 
wird man aufgefordert, den Na- 
men der Diskette einzugeben. 
Hierbei ist zu beachten, daß der 
Name, wie beim normalen Forma- 
tieren, nur 16 Zeichen lang sein 
darf. Alle weiteren Zeichen wer- 
den vom Computer ignoriert. 

Die zweite Eingabe bezieht sich 
auf die ID der Diskette. Sie setzt 
sich aus zwei beliebigen Zeichen 
zusammen. 

Auf die folgenden Fragen antwor- 
tet man mit „j/n" für ja/nein. Es 
wird jeweils eine Antwort vorge- 
geben, so daß oft nur noch RE- 
TURN gedrückt werden muß: 
Diskette verifizieren? 

Hier legt man fest, ob ein Verify 
durchgeführt werden soll. Wer es 
besonders eilig hat und auf die 
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Sekunden 


Disketten formatieren 
mit “N:Name, ID“ 
dauert 90 Sekunden. 


Speed Format kann's 


achtmal schneller. 


Qualität seiner Disketten vertraut, 
antwortet mit „n“. Wer sieben Se- 
kunden mehr mitbringt, geht auf 
Nummer sicher und gibt „j" ein. 
Die nächste Abfrage lautet: 
Blocks mit 0 füllen? 
Normalerweise werden die Sekto- 
ren der Diskette beim Formatie- 
ren mit $01 gefüllt, außer dem er- 
sten Byte, das den Wert $4b er- 
hält. Dies liegt an einem Fehler im 
Betriebssystem der Floppy. Hier 
wird der Bug behoben: Auf 
Wunsch wird die Disk mit neutra- 
len Nullen gefüllt. Das Formatie- 
ren läuft dabei mit dem gleichen 
Tempo. 

Als nächstes wird gefragt: 

Bis Spur 40 formatieren? 


Spur 36 bis 40 
BEESENEN 


Standardmäßig werden Disketten 
nur mit 35 Spuren formatiert. Es ist 
aber möglich, auch die Spüren 
36—40 zu nutzen. Diese Spezialität 
wird häufig bei Kopierschutzver- 
fahren angewandt. Beschreiben 
und lesen kann man die versteck- 


ten Sektoren mit einem Zugriff auf- 


die Jobschleife der Floppy. Zuvor 
müssen die Extratracks formatiert 
werden. Speed Format braucht 
dann 1—2 Sekunden mehr. 

Die letzte Abfrage ist: 

Alle Eingaben richtig? 

Falls man bei der Eingabe einen 
Fehler gemacht hat, gibt es hier 
die Möglichkeit, ihn auszubes- 
sern. Wird die Frage mit Nein be- 
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antwortet, erscheint der Cursor 
noch einmal in der obersten Ein- 
gabezeile. Nun kann man die feh- 
lerhaften Angaben korrigieren. 
Andemfalls wird man aufgefor- 
dert, die Diskette in das Laufwerk 
einzulegen. Nach einem beliebi- 
gen Tastendruck wird das eigent- 
liche Formatierprogramm zur 
Floppy übertragen und gestartet. 
Sobald die Systemmeldung 
00,OK,00,00 zu lesen ist, kann die 
Diskette aus dem Laufwerk ge- 
nommen werden. Wenn beim 
Verifizieren ein Fehler auftritt, 
wird die Fehlermeldung 08,DISK, 
Tracknummer,00 ausgegeben. 
Klappt das Formatieren auch bei 
weiteren Versuchen nicht, ist die 
Diskette beschädigt. 


Formatieren am 
Fließband 


Die folgende Abfrage: 

Noch eine Diskette formatieren? 
führt zu einem weiteren Formatier- 
lauf oder zum Verlassen des Pro- 
gramms. 

Das Programm ist ganz in Maschi- 
nensprache geschrieben. Es ist 
als kombinierter Hexdump-Basic- 
lader abgedruckt (Listing 1). Wie 
man mit dieser Art von Listing um- 
geht, steht auf Seite 6. Wird das 
Programm als Basiclader einge- 
geben, so muß es vor dem Start 
mit RUN unbedingt abgespeichert 
werden. Das fertige Maschinen- 
programm kann nach dem Einpo- 
ken der Daten mit 

POKE 43, 1:POKE 44, 8 

POKE 45,114:POKE 46, 12 

SAVE "NAME'",8 

auf Diskette abgespeichert wer- 
den. Wird es als Hexdump einge- 
geben, so muß der Checker be- 
nutzt werden. Als Startadresse ist 
0801 anzugeben. Das Programm 
wird nach dem Laden mit RUN ge- 
startet. 

(Stefan Donhayser za 


0801 


DATA 


0B,08,C2,07,9E,32,30,36, 23 | 0A5S93 760 DATA n2,14,8E,74,02,BD,1B,06, 02 
0803 20 DAIA 31,00,00,00,20,44,ES,A3, 49 | pas1 770 DATA 9D,00,02,CA,10,F7,20,A6, 69 
o811l 30 DATA 00,85,0A,A2,00,86,02,20, 41 | oABS3 780 DATA C&,AC,4B,02,B9,00,02,85, 38 
0819 49 DATA CDO,08,A9,10,20,99,08,C0, 17 | pa7ı 738 DATA 12,89,01,02,85,13,78,#R9, 99 
v282l 50 DATA 00,F0,06,A9,2C,39D,74,0C, 66 | eA73 800 DATA 15,8D,07,1C,AD,00,1C,09, 33 
0829 60 DATA EB,20,C0,08,R0,02,20,393, A3 | oaBsı 818 DATA 0C,8D,00,1C,A6,22,00,02, BS 
0831 ?0 DATA 08,20,C0,08,A2,00,20,A8, B3 | OABS 820 DATA A2,29,8A,0A,85,22,AE,00, 08 
0839 80 DATA 08,F0,02,A2,01,8E,73,0C, 54 | OAsı 830 Dan 1C,CA,20, C7,0s, C6,22,00, 3E 
841 30 DATA 20,C0,08,R2,00,20,A8,08, 47 | oas3 840 DATA FS,E6,22,AD,00,1C,29,FC, 36 
e843 10D DATA FO,02,A2,01,8E,72,0C,20, S6 | BAnı 850 DaIa 80,00,1C,20,03,05,20,DE, 98 
0851 110 DATA CO,08,A2,28,20,AB,08,F0, BF | oAn9. B60 DATA 05,A9.CE ‚80,00. 1C,AS, FF. 37 
0859 120 DATA D2,R2,23,8E,FA,0B,20,C0, 44 | OABl 870 DATA 8D,03,1C,A9,55,8D,01,1C, AB 
0861 130 DATA BB,ES,0A,20,AB,08,00,AB, D4 | OAES 880 DATA A6,22,A9,12,E0,24,B0,04, 81 
0869 140 DATA 20,C0,08,A9,00,85,C6,20, E1 | @BACı ’ 830 DATA 8A,20,4B,F2,85,43,A0,00, AS 
0871 150 DATA E4,FF,FO,FB,A2,OF,20,FF, 8E | BACS 00 DATA 84,08,95,39,99,00,03,45, DE 
0873 168 DATA EI,20,C2,09,20,C0,08,20, CA | eADLı Sı0 DATA 08,39,02,03,15,22,939,03, 87 
oss1 170 DATA 2A,0A,20,C0,08,20,R8,08, 08 | ORADS 20 DATA 03,45,13,99,04,03,A5,12, 6D 
08893 180 DATA 00,00,R2,18,20,FF,E3,Ch, 8C | oRE1 330 DATA 99,05,03,A9,0F,399,06, 03, 68 
0881 190 DATA E2,0C,D0,F8,4C,14,08,60, 8C | OREQ 940 DATA AS,08,45,22, 45,12,45,13, 24 
0833 200 DATA 20,CF,FF,C9,0D,F®,07,3D0, 10 | @AFı 35® DATA 99,01,03,E6,08,98,18, 69, DS 
vaRl 210 DATA 74,0C,E8,88,00,F2,60,A0, 65 | OAF9 960 Dan 08,A8,A5,43,C5,08,D®,Ch, 84 
BBR3 BED DATA HA,2C,AB,4HE,AS,0A,D0,09, Di | OBB1 370 DAIA 38,48,AD,19,06,20,10,06, D4 
OBB1 230 DATA S8,20,02,FF,A9,90,20,D2, AS | BBES 80 DATA £C3,01,098,05,A9,4B, 8D, 00, 7C 
GBBES 248 DATA FF,20,CF,FF,C9,4A,60,#9, Es | oB1ı 998 DATA 07, As, 03,85,31,20,30,FE, 20 
BEC1 250 DATA 0D,20,D2,FF,A4,02,893,03, 47 | BE1IS 1000 DATA 68,98,88,20,ES,FD,20,F5, 3B 
e8CS 260 DATA 08,C8,E6,02,20,02,FF,D®, Aal | BB21 1010 DATA FD,A9,07,85,31,20,E3, Fs, DB 
vBD1 270 DATA FS,60,13,11,20,23,23,23, 34 | 0B23 1020 Data 85, 3A,20\ BF. ‚F7,ns, 00,85, as 
eEn3 280 DATA 20,53,590,45,45,44,20,46, B4 | 0831 1030 DATA 32,9, FF, 80,01,1C,A2,05, 70 
eBEl 230 DATA 4F,52,4D,41,54,20,56,31, 62 | 0533 1040 ‚DATA S50,FE,E8B,CA,DO,FA,A2,BA, AF 
DBES 300 DATA 2E,30,20,23,23,23,00,11, F7 | 0841 1050 DaTa A4,32,58,FE,B9,20,03,88, C8 
o8fl 310 DATA 4E,41,4D,45,34,090,00,49, 13 | BE4S 1060 Data 8D0,01,1C,C8.CH.Do,Fa.04. 49 
eBF3 322 DATA 44,3A,00,0D,0D,44,49,53, BC | BBS1 1070 Data 32,42,09,50,FE,B8,49,55, E3 
0321 330 DATA 4B,45,54,54,45,20,56,45, 3C | 08593 1080 DATA 8D,01,1C,CA,DO,F5,A9,FF, 63 
2523 340 DATA 52,49,45,49,5A,49,45,52, on | EOB61 1098 DaTa A2,05,50,FE,B8,8D,01,1C, FF 
oS11 350 DATA 45,4E,20,20,20,3F,20,00, F3 | 0863 11008 DaTa CA,DO,F7,A2,BB,50,FE,BB, FF 
02313. 360 DATA OD,42,4C,4F,43,4B,53,20, F3 | 0B?71 11198 DATA BD,00,21,80,01,1C,E8,D02, 2E 
e321 379 DATA 40,49,54,28,30,20,46,55, 39 | 0B73 1128 DATA F4, ‚no'do,. 58,FE,B8,B1,38, CB 
0323 388 DATA 45,4C,4C,45,4E,28,20,20, 2E | 0881 1130 DATA 80,01,1C,C8,D8,F5,R9, SE, OF 
e331 330 DATA 20,3F,20,00,00,42,49,53, C2 | BE83 1140 DaTa A2,09,50,FE,B8,80,01,1C, FB 
0333 1408 DATA 20,53,50,55,52,28,34,30, FE | 0BS1ı 1159 DATA CA,DO® ‚F7.CB: 88,08,SA,A9, 55 
‚eS41 41® DATA 28,46,4F,52,4D,41,54,49, EE | 0699 1160 DATA ES; 80,81,1C,50,FE,B8,50, 68 
2349 428 DATA 45,52,45,4E,29,3F,20,00, EC | BBA1 1170 DATA. FE,BB, 20, @0,FE,AD,1A,06, CB 
0351 438 DATA 0D,020,41,4C,4C,45,29,45, D7 | OBAS 1180 Data F0,03,4C,9E,05,R9,64,85, D6 
2353 442 DATA 49,4E,47,41,42,45,4E,20, 2C | 0881 1190 DATA on, ag, 00,85,30,A5,43,85, 27 
2361 450 DATA 52,49,43,48,54,49,47,20, 36 | BBBS 1200 DATA 08,20,F7,05,R2,0n,A4, 38, E4 
03693 60 DATA 3F,20,4E,9D,00,91,42,49, 33 | 8OBC1 1210 DaTa S0,FE,B8,AD,01,1C,09,00, ıB 
0371 478 DATA 54,54,45,20,44,49,53,4B, 28 | BBCS 1220 DAIA 03,09,3C,C8,CA,DO,F1,84, OF 
0373 BO DATA 45,54,54,45,29,45,49,4E, D5 | OBD1 1238 DATA 30,20,F7,05,A0,BB,50,FE, 38 
e381 1438 DATA 4C,4S,47,45,4E,20,21,00, S8 | 0BD3 1248 DATA B8,AD,01,1C,09,28,01,00, Fa 
05893 59B DATA 91,42,49,54,54,45,28,57, IC | OBE1 1250 DATA 26,C8,D0,f2,50,FE, BB, ‚AD, 9A 
0331 510 DATA 41,52,54,45,4E,20,21,91, BC | OBES 1260 DATA o1 ‚1C,D9,00,07,D00,18,C8, 45 
03939 520 DATA 91,0D0,00,0D0,0D,4E,4F,43, 42 | OBF1 1270 DATA D2,F2,C6,08,00,C3,#5, Ba: 28 
osAl 530 DATA 48,20,45,49,4E,45,20,44, 09 | OBFS 1280 DATA C9,23,F0,18,E6,22,208,C3, sD 
esA9 S4D DATA 49,53,4B,45,54,54,45,20, 21 | 0C01 1298 DATA 05,20,C3,05, yc, 4E,04, CB, DF 
oSB1 550 DATA 46,4F,52,4D,41,54,49,45, ED | 0C093 1300 DATA oA,DO,An,AS,22,85,80,n9, B4 
093B3 560 DATA 52,45,4E,20,3F,20,4A,9D, 87 | @Cı1ı 1310 DATA 08,4C,45,E6,58,20,05,F0, 69 
eSC1 570 DATA 00,A9,59,8D,EB,09,A9,0R, A4 | ECıS3 1320 DATA 4C,56,EE,AE,00,1C,E8,8BA, 77 
eSC9 SB® DATA 8D,EC,09,#9,00,80,27,0R, 33 | OC21 1330 DATA 4D,08,1C,29,03,4D,00,1C, DB 
8301 532 DATA AS,24,80,28,0A,n2,10,20, 62 ec23 1340 DATA 80,00, PC,ADd,04,A2,00,CA, AP 
oS03 500 DATA 15,0R,R0,00,B3,24,0A,20, 29 | 8C31 1358 DATA DO,FD,88,D0, FA,60,AS, 22, AB 
09E1 618 DATA AB,FF,C8,C0,06,D0,FS5,Rd, 3D 0C33 1360 DATA 20 ‚dB, F2,10,02,A2,02,AD, 6C 
BSES 620 DATA 00,AD,89,0C,20,AB,FF,EE, 59 | @C4H1 1370 DATA 00, 1C,29,9F,1D,F3, 05, ‚80, 12 
eSF1 630 DATA EB,09,09,03,EE,EC,09,C8, Fi 2C43 1380 DATA 00,1C,60,00,20,40,60,A9, DB 
eSF3 640 DATA C0,23,00,ED,28,AE,FF,CaA, 27 | 0C51 1390 DATA 00,80, 05,18,2C,05,18,10, SF 
eneı 650 DATA FO,11,AD,27,04,18,69,23, 9C | 0CS93 1400 Data on,oc, 00,1C,30,F6,AD,01, #9 
em?e3 5560 DATA 8D,27,0A,90,CA,EE,28,0R, DB | OC61 1410 DATA 1C,B8,60,68,58,4C.AF.os. 22 
orllı 678 DATA 4C,D8,09,60,A9,08,20,B1, 2E | CC693 1420 DATA A2,08,9D0,00,07,E8,D0,FA, 33 
eAlS 680 DATA FF,A9,6F,4C,93,FF,4D,2D, 2D | 0671 1430 DATA 60,00,20,020,00,00,002,00, 60 
or2e1 6902 DATA 45,00,04,4D0,2D,57,00,06, Da 
er2e3 708 DATA 23,20,15,0A,R9,00,BS,1F, 47 60093 FOR A-2243 ID 3184 STEP B: . 4013 
eA31 710 DATA On,20,A8,FF,C8,C0,05,08, Di S-=8:0=®:FOR B=8 TO 7:G0SUB 
eAR33 720 DATA FS,20,AE,FF,AS,08,20,64, 38 69949 
oR41 738 DATA FF,A9,6F,20,96,FF,A2,0F, CF 60019 S-S+H+L-C:C=S>255:5=-255-5 5934 
oR4HS3S 74D DATA 20,FF,ES,20,AS,FF,29,02, DF AND 255:POKE A+B,H+L:NEXT 
oRS1 758 DATA FF,C9,00,00,F6,4C,AB,FF, 09 B:GDSUB 69040 


> 
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.60028 F$S="PRUEFSUMME OK”:IF S<> 


H+L-THEN FS="ERUS] 
PRUEFSUMMENFEHLER”:F=F+1 

60030 GOSUB- 60899. NEXT A:PRINT ” 
EDDWNI”F”FEHLER”:END 

600420 READ H$:G6DSUB 69058:H=L* 
16:H5=MIDS CHS,2) 

600590 L=ASC CHS+"X”)-48: IF L<® 


LISTEN 


“ sFFBl 
SECOND = sFF33 
CIDUT “ SFFAB 
UNLIST Ye SFFAE 
TALK = sfFB4 
TKSA “ SFF36 
UNTLK = SFFAB 
ACPTR ” sFFAas 
DISK iz 52400 
FLPRG y soA53 
BUFFER ® scC74 

; MENUE 


;BILDSCHIRM LOESCHEN 


START  LIX #0 


; TEXTANFANG 


sTIx so2 

JSR ' PRINT ;TEXT AUSGEBEN 
LDY wi56 ‚mAX 15 ZEICHEN 
JSR INPUT 

ECPY #08 

BED Li 


ENDNAME LDA #",” 
STA BUFFER,X ‚Komma SETZEN 
Li INX 
JSR PRINT 


;TEXT AUSGEBEN 


LDY #02 max 2 ZEICHEN 
JSR INPUT 

i 
JSR PRINT ; TEXT AUSEE 


LDX #008 ı B=VERIFIZIERE 

JSR GEIJ ;JA/NEIN-ABFRAGE 

BED JAl 

LDOX #oı ;I=NICHT VERIFIZIEREN 
Jal STXx SC73 


JSR PRINT ; TEXT 
LDX «oo 


;BLOCK MIT 08 FUELLEN 
SR GET ;JA/NEIN-ABFRAGE 
BEO JA2 
LDX "pi ;SONST MIT 01 FUELLEN 
Ja2 SIX scC72 
; 
JSR PRINT TEXT 
LDX #48 BIS TRACK 46 FORMATIEREN 
JSR. GEIN 
BEO „JRA3 
LDX #35 ;BIS TRACK 35 
Ja3 SITX ZBFA 


SSR PRINT ; TEXT 
InC. 10 

SSR EEIN 
BNE START 
SER PRINT 


;NEUEINSABE 


LDA #008 „TASTATURPUFFER LOES 
SIA 158 

KEY JSRN, SFrEH ; TASTATUR ABFRAGEN 
BEUBENST iKEINE. TASTE EEDRUETKT 
LDX #15 


JSR, SESFF ;ZEILE 15 LDESCHEN 


JSR FPROG 
JSR PRINT 
JSR FSIART ;FORMATIEREN 


;PROGRANM INS FLOPPY 


JSR PRINT 
" JSR GET 


BNE READY 


ıDyX # 
ZLEAR JSR -$ 
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DR L>22 THEN 69088 

60968 IF L<18 THEN RETURN 

50079 L=L-7:IF L>9 THEN RETURN 

60089 Fs="LRUSIEINGABEFEHLER”:L= 
8:F=F+1 

600398 PRINT ”ZEILE” PEEK .c64)* 
2S6+PEEK (6B3)F$: RETURN 


JMP START 
READY RTS 
| ARRRHEHFRHEN HEHE HERREN 
1 ;STRING MIT MAX. Y ZEICHEN NEHMEN 


;„‚NAECHSTE DISKETTE 


INPUT JSR SFFCF ;ZEICHEN HOLEN 
cnP° #13 ;WENN RETURN, 
BEO ENDINPUT ;DANN ENDE 
SIA BUFFER,X ;ZEICHEN MERKEN 
INX 
DEY 
BNE INPUT 

ENDINPUT RTS 


| ;I/N-EINGABE 
| BET Loy. erg” 
.BYT s25 


SETN LDY | “"N" 


LDRA ıCc 
BNE NO 

I TyYa 

\ JSR SFFD2 iJ/N VORGEBEN 
LDAa ""n" 
JSR SFFD2 

NOT JSR SFFEF EIN ZEIZHEN HOLEN 

EnP. "I" 
RTS 


een een 
; TEXT AUSDRUCKEN 
PA. E 2 2 2 2 2 2 2 2 2 2 2 ZZ ZZ ZZ ZIa ZZ ZZ ZZ ZZ 
PRINT DA #3 
JSR SFFD2 


iNAECHSTE ZEILE 


| LDY so2 ANFANG DES TEXTES 
| LOOP LDA TEXT,Y 
N InY 
INZ so2 
JSR. SFFD2 ZEICHEN AUSGEBEN 
EBENE LDOP 
RTS 
TEXT - . 
Tı ‚ASCE "ziel ” 
| .„ASC "run SPEED FORMAT U1,0 un" 
.BYT 13 
‚ASC "SNANE:” 
«BYT 8,13 
sASE ID: 
| :231:0,23733 
| ‚A “"DISKEITE VERIFIZIEREN |? " 
I 5 e,13 
"FELDCKS MIT O-FUELTEN Per 


«BYT 0,13 
| .ASC "BIS SPUR 40 FORMATIEREN ? " 
ij »BYT 0,13,13 
„AST "ALLE EINGABEN RICHTIG ? NM" 
.EYT ® 
.ASZ "BITTE DISKEITE EINLEGEN !" 
| „BYT D 
‚ASC "DBITTE WARTEN. ID" 
.BYT 132,0,13,13 
„AST "NOCH EINE DISKETTE FORMATIEREN ? JM" 
.BYT 8 
\ ÜRRRRRRRRRRUT EEE HRRER HEHE 
; PRG UEBERTRAGUNGS Zu FLOPPY 
BET E EI 2 2 2 22. 2.20272.2 020 2.2.2.2.2.212022.2.2.2.2.2:2.2 
FPROG - “ S 
LDA #<FLPRG ;LAGE DES FLOPPY-PRGS 
SITA BYITE+1 ;IMm SPEICHER 
LDA #>FLPRG 
sIa BYiE+2 


LDA #<nISK ;ANFANG DES PROGRAMMS 
sIa AIR ‚Im FLDPPY 
iDAaA #>DISK 
LSIA ADR+1 
LDX #165 


NEXT JSR DPCH 
Lpy #0 


LISTEN AN FLOPPY 
;M-W BEFEHL SENDEN 


MULCDP - LOR Mu,y JSP LISTEN 
> LDA #sör 
Inv JNP SECOND 
ro 
ee .ASE "N-E” 
Z - .BYT 9,4 
ıDy 35 BYTES SENDEN SS Ende 
iD LPR «BYT 0,0,35 
JSR ; 
In EY :ZAEHLER ERHOEHE) ;FLOPPY-PROGRANM STARTEN 
BNE NBY ; 
InZ By FSITART JSR OPCH ;LISTEN SENDEN 
NBYTE INY LDY «oe 
CPY ;SCHON 25 BYTES EXLooP_ LDA EX,Y  ;BEFEHLSSTRING 
BNE BY ;NEIN, DANN WEITER JSR CIOUT ;AN FLOPPy GEBEN 
JSR UNLIST INY 
CPY as 
DEX BNE EXLODP ;NAECHSIES ZEICHEN 
BEO ENDE JSR UNLIST ' ;UNLISTEN SENDEN 


LDA ADR FEHLERMELDUNG VON FLOPPY LESEN 
ELC ; 
ADE #35 LDA #B ;iGERAETENUNNER 8 
STA ADR JSR TALK TALK SENDEN 
CC NEXT LDA #s6F ;SEKUNDAERADRESSE 15 
INC ADR+1 TKSA 
; F “15 
JMP NEXT x ?  SESFF 
ENDE RIS > 


; AZPTR ;BYTE VON BUS 

; sFFD2 ;AUF BILDSCHIPN DRUCKEN 
;LISTEN AN FLOPPY SENDEN “13 ‚RETURN CLETZTES ZEICHEN) 
; MELD 

DPCH LDA #8 ;GERAETENUMMER B UNTLK :UNTALK SENDEN 


‚DPT 00,P1 ;‚ERSIER SEZTOR 


sonss HEADER 
LDx «2e ;MAXIMALE LAENGE 


5274 ;DES HEADERS 
GETNANE NAHE,X 


s200,X 


EETNANE 

STEAE ;LAENGE DES NAMENS 
s24B ;NACH SO24B 

z288,Y 

zsı2 ;IDı 

s201,Y 

513 ;‚ID2 


- ies: 
#s15  ;INTERRUPTANZAHL re ie 
S1Ie7 !EPHDEHEN 
sıcae 
“12 ;LED UND MOTOR 
s1C00 (EINSCHALTEN 


s22 ‚AKTUELLER TRACK 
RUECKI ;FALLS C,DANN 


“41 ‚#1 TRACKS ZURUECK 
RUETCKI e ;NAECHSTEN 
iHEADER 
>“ \ ERSTELLEN 
RUECK ‘ SıC00 ;KOPF Zum 
;ANSCHLAG 
MHESD FAHREN ; LOCK l 
ae i  BLOCKINHALT 
RUECK 


s22 


zsı700 i KOPF IN 

"src ; NORMALPOSITION 
sı7oo 

WARTEN 

SETSPEED 


nscE ;jAUF SCHREIBEN 

SICCE ;SCHALTEN 

"srrf 

sıc03 

#sss ;SPUR LOESCHEN 

sıcoı ; PRUEFSUNME 

s22 ‚TRACK ge 
«18 ANZAHL SEZTOREN > DEE BEN 
"35 ;AB TPACK 35 ; 

51 


sr2uB ‚ANZAHL DER SECTDPEN |) ISBERIORENSZEUERTBEN 
z43 ABSPEICHERN 


*0D 


> 
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WSYNT BUE WEYNE  ;CSYNI-MABKIERUNG) ıDa sı7c01 ; BLOCK VERGLEICHEN 


ELU ;SCHREIEEN EMP 5s100,Y 
DEX : ENE FEHLER 
BNE WSYNC 2 INY 
LDXY #18 BNE VELOTK 
LDy s32 n > 
HUAIT BUC HWAIT VELDSKA BUC UELOIKA 
LDA $0308,Y ;HEADER SCHREIBEN LU 
LLU Lpa sıcoı 
STA S$1C01 ECNP SC?00,Y 
InY BNE FEHLER 
DEX INY 
EBNE HWAIT ENE VELDIKA 
ıy s32 ; 
; DEC s0oB 
LDx #9 BNE USECT- ; NAECHSTER SECTOR 
LUAIT BUC LWAIT SET. 
c . rg ETRAZ L 2 
[DR us.” Nie cmP #35 ;LETZTER TRACK 
SITA sıCc0ı1 : BED FERTIG ;WENN JA,DANN ENDE 
DEX INZ s22 
BNE LWAIT ISP INNEN  ;ZWEI HALBSPUREN 
; JSR INNEN ;NACH INNEN 
LDA #SFF JMP TRACK  ;NAECHSTEN TRACK 
LDx #5 ;SYNC-MARKIERUNG LEER 
WSYNIE BUC UWSYNCB FERLER x 
£LU DEC soA ;ZAEHLER 
SIA 1701 BNE VERIFY 
DEX ; 
BNE USYNCB LDa s22 
; SIa s3O ;TRACK 
LDX +#sBB LDA #08 
WELOCKR BUT WELOCKA JmP sES4S ;FEHLERMELDUNG 
CLU ‚ERSTE ; 
Ida sıa0,x '" DES Bioexs FERTIG _ ELI er 
SIA s1C01 ; SCHREIBEN = ‚DIRECTORY EINTRAGEN, PRG-ENDE 
INX IS sFoos 
ENE, WELDIKA JmP SZESS 
» i 
} LDY #8 :KOPF EINE HALESPUR 
WBLOCKB BUC WELOCKB ;NAZH INNEN/RUSSEN BEWEGEN 
ELU ;2.TEIL e 
LDA (s30),Y INNEN - - 
SIaA sıc01 LDX.- sicoe 
INY INX 
BHE WBLOCKB MHEaD TXA 
5 R EIP sSICcCO ;UNTERE 2 EITS 
LDA #s55 ;LUECKE ZWISCHEN AND #3 ‚NEU SETZEN 
LDx- es ;DEN SECIOREN EOR SıC08 
WSPATE BUC USPACE SIa SsıC00 
ELU WARTEN = . ;AUF STEPPER WARTEN 
SIa sıceı Lny #4 
DEX LDx *®8 
BNE UWSPACE wWAIT DEX 
: BNE WAIT 
' DEC sos DEY 
BNE_ NSECT ;NAECHSTER SECTOR BNE WAIT 
; RIS 
ına #35 s 
STa sıCeı1 SETSPEED - - 
A BUCE A ;SCHREIBSESCHWINDIGKEIT 
CLu ESTLEBEN 
E BuUc B ıDa s22 
ELU JSR SF24B 
JSR .SFEOB ; AUF LESEN SCHALTEN EPL Ti 
; LDOX #2 
LDA var-ı rı LDA SıC08 
BED UTRAIK AND #S3F 
JMP  ETRACIK OPA TAB,X 
i SIA SıC00 
; VERIFY DES TRACKS PIS 
x - TAB .BYT 500,520, 540,550 
VIRACK LDA #100 ‚100° LESEVERSUCHE ; 
ETA OA SYNc - . 
LDaA #o LDA #sDo 
SIA 830 STA 818935 
VERIFY LDA 843 ;ANZAHL L1 EiT 81905 
Sta sos ;SECTOPEN BPL L2 ;KEIN SYNC GEFUNDEN 
USEIT JSR SYNC BIT sıC0oo 
5 erni Li 
LDX #10 LDa sıcoi 
LDY «30 ° LLU 
VHEADER EUT UHEADER PrS 
er A 
LDA sıcei ;HEADER VERGLEICHEN L2 PLA 
CHP SC320,Y PLA 
BNE FEHLER JMP FEHLER 
INY ; 
DEX CLEAR LDX #00 
BNE - UHEADER FILL STA $S700,xX 
STYy s3® INX 
; BNE FILL 
JSR SYNC ;SYNC ABWARTEN RTS 
; VAR - . 
LDY #sBB .BYT 1 ; INHALT DER BLOCKS 
VELOCK EUC UVBLOCK .BYT ® ; B=VERIFY DURCHFUEHREN 
CLv NAME ‚AST "AUDI DUATTRO,SC" 
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Blitzcopy — Back-up 
in 100 Sekunden 


Normale Kopierprogramme 
schaufeln in lahmen 30 Minuten 
die Daten von einer Diskette zur 
andern. Wer nicht so lange war- 
ten wollte, der griff zu Schnellko! 
pierern; sie drückten die Back-up- 
Zeit auf flotte drei Minuten. 

Doch das ist nicht alles, was in der 
Floppy steckt. Blitzcopy erreicht 
die Traumzeit von 100 Sekunden! 
Mit Turboroutinen treibt es die 
Floppy an ihre Leistungsgrenze. 
Auf die nötige Datensicherheit 
wird dabei nicht verzichtet: Jeder 
Schreibvorgang wird mit einem 
Verify überprüft. 

Blitzcopy liest auch Disketten, die 
mit einem dejustierten Laufwerk 
beschrieben wurden. Sie werden 
ohne Rattern oder Lesefehler auf 
Normalformat umkopiert. Außer- 
dem kann das Programm zwei Dis- 
ketten byteweise miteinander ver- 
gleichen und Disketten auf Fehler 
testen. 

In Kopierprogrammen ist, Spei- 
cherplatz Mangelware. Trotzdem 
bietet Blitzcopy eine dem Macin- 
tosh und dem Atari ST nachemp- 
fundene Benutzerführung. 

Das Programm meldet sich nach 
dem Start mit einer Menüzeile und 
einem Feld für Ausgaben und 
Meldungen des Computers. Mit 
den Tasten CURSOR DOWN (für 
links) und CURSOR RIGHT (für 
rechts) werden die Menüpunkte 
angewählt, und mit RETURN wird 
der revers dargestellte Punkt ge- 
startet. 

Die einzelnen Menüpunkte sind: 
CATALOG 

Auflistung des Inhaltsverzeichnis- 
ses der eingelegten Diskette. Die 
Ausgabe erfolgt, bis der Bild- 
schirm voll ist. Danach kann mit 
SPACE der nächste Teil abgeru- 
fen oder mit STOP ins Menü zu- 
rückgekehrt werden. 

BACK-UP 


Komplettes Back-up einer Disket- 


te auf einem Laufwerk. Nach dem 
Start der Back-up-Funktion for- 
dern ein Signalgong und ein Dis- 
kettensymbol mit der Aufschrift 


Schnell, schneller, 
am schnellsten — 
Blitzcopy setzt neue 
Maßstäbe: Volle Dis- 
ketten werden in 100 
Sekunden kopiert — 


samt Verify. 


„FROM" auf, die Originaldiskette 
einzulegen. Außerdem wird auf 
dem Bildschirm hinter PASS der 
momentane Durchgang und aufer 
ner Uhr die für die Kopie benötig- 
te Zeit angezeigt. Wenn die Origi- 
naldiskette eingelegt wurde, kann 
der erste Durchgang mit einer be- 
liebigen Taste gestartet werden. 
Falls jetzt keine oder eine nichtfor- 
matierte Diskette im Laufwerk 
liegt, wird abgebrochen. 


‘Nach jedem Lesedurchgang wird 


eine Übersicht aller eingelesenen 
Diskettensektoren angezeigt. Ein 
fehlerfreier Sektor wird durch ei- 
nen Punkt (“.“), ein fehlerhafter 


Sektor durch eine Fehlernummer 
gekennzeichnet. "0" bedeutet Le- 
sefehler 20 und "3" Lesefehler 23 
(Bedeutung siehe Floppyhand- 
buch). Die fehlerhaften Sektoren 
werden auf der Kopie durch leere 
Sektoren ersetzt. 


Von FROM nach TO 
EN 


Nach dem Lesedurchgang muß 
die Zieldiskette eingelegt werden. 
Blitzcopy macht durch ein Disket- 
tensymbol mit der Aufschrift "TO" 
darauf aufmerksam. Der Kopier- 
vorgang kann bei jedem Disket- 
tenwechsel durch Drücken der 
STOP-Taste abgebrochen wer- 
den. Beim Beschreiben wird die 
Zieldiskette zuerst formatiert, 
dann beschrieben und anschlie- 
ßend verifiziert. Falls ein Fehler 
aufgetreten ist, werden noch drei 
weitere Schreibversuche unter- 
nommen. Wenn sich die Diskette 
dann immer noch nicht beschrei- 
ben läßt, wird die Fehlermeldung 
WRITE ERROR TRACK ausgege- 
ben. Ist die eingelegte Zieldisket- 
te schreibgeschützt, wird der Ko- 
piervorgang abgebrochen. 

Während des Kopierens wird der 


% CATALG BACKUP VERIFY TESTER kim) 


DODDUODTD 
ARRARIIT 
IIND 


Bild 1: Blitzcopy besitzt Icons und Kommandboleiste 
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Bildschirm abgeschaltet, um Un- 
terbrechungen des Programms 
durch Speicherzugriffe des Video- 
chips auszuschließen. Zur Kontrol- 
le des Kopiervorgangs wird bei je- 
dem Spurwechsel die Bildschirm- 
farbe hochgezählt. 

VERIFY 

Vergleich zweier Disketten. Die 
Bedienung ist wie bei der Back- 
up-Funktion, jedoch wird. hier 
nicht die Original- auf die Zieldis- 
kette kopiert. Statt dessen werden 
zwei Disketten miteinander vergli- 
chen. 

Beim Verify wird auch bei der 
„Zieldiskette" eine Übersicht aller 
eingelesenen Sektoren angezeigt. 
Dabei bedeutet "/", daß der Sek- 
tor identisch mit dem. entspre- 
chenden auf der Originaldiskette 
ist, und “3", daß der Block vom 
Original abweicht. Andere Zahlen 
bedeuten wie bei Back-up, daß 
sich Lesefehler auf der Zieldisket- 
te befinden. 

Zur Unterscheidung von der Back- 
up-Funktion werden die drei nöti- 
gen Durchgänge am Bildschirm 
als PASS 4, 5 und 6 angezeigt. 


Trick spart Arbeit 
une 


' Beim Verify erspart man sich eini- 
ges Hantieren durch folgendes 
Vorgehen: 

PASS 4: Diskette A lesen 

Mit Diskette B vergleichen 

PASS 5; Diskette B lesen 

Mit Diskette A vergleichen 

PASS 6: Diskette A lesen 

Mit Diskette B vergleichen 

Statt sechs Diskettenwechseln 
sind so nur vier nötig. Die Reihen- 
folge, in der die Disketten gelesen 
werden, liegt also nicht völlig fest. 
Daher wird die nächste einzule- 
gende Diskette nicht durch Ver- 


wendung. der. "FROM"/"TO"-Dis- 


kettensymbole angefordert. 

Ein komplettes Verify zweier Dis- 
ketten dauert etwa eine Minute 15 
Sekunden. Die ID der beiden Dis- 
ketten muß nicht übereinstimmen. 
TESTER: 

Prüfen einer Diskette. Hier wird 
jeder Block gelesen und auf Feh- 
ler untersucht. Der Inhalt der Dis- 
kette bleibt dabei erhalten. An- 


Floppy 


schließend wird ähnlich wie beim 
Back-up eine Übersicht aller Sek- 
toren der Disketten ausgegeben. 
Da nicht alle Sektoren auf einmal 
auf den Bildschirm passen, wird 
das Testen in zwei Durchgängen 
durchgeführt.Der gesamte Test- 
vorgang dauert etwa eine halbe 
Minute. 

COMMAND 

Mit dieser Funktion können Befeh- 
le an das Diskettenlaufwerk ge- 
sandt werden. Die Befehlsausfüh- 
rung wird mit RETURN gestartet. 
Der Computer wartet, bis die Aus- 
führung abgeschlossen ist, und 
zeigt dann die aktuelle Fehlermel- 
dung des Laufwerks an. 


Beispiele: 

Löschen von Programmen auf Dis- 
kette: S:PROGRAMMI, PRO- 
GRAMM2..... 


Initialisieren einer Diskette: I 
Formatieren einer Diskette: 
N:DISKNAME,ID 

‘Bei der Benutzung von Blitzcopy 
ist zu beachten: 

— Nach Ausführung von BACK- 
UP, VERIFY oder TESTER sollte 
man erst nach etwa zwei Sekun- 
den wieder einen Menüpunkt an- 
wählen, damit das Laufwerk in al- 
ler Ruhe seinen Speicher löschen 
und testen kann; sonst blockiert 
das Programm, und RUNSTOP/ 
RESTORE muß betätigt werden. 
— Während des Kopiervorgangs 
müssen sämtliche Geräte, die am 
seriellen Bus angeschlossen sind, 
abgeschaltet sein. 

— Das Programm kann nur durch 
RUNSTOP/RESTORE oder RESET 
verlassen werden. 

So funktioniert Blitzcopy: 

Das Prinzip eines Back-up für ein 
Laufwerk ist klar: Daten von Dis- 
kette A in den Computer lesen, 
Diskette wechseln, Daten auf Dis- 
kette B zurückschreiben. Im Com- 
puter hat nur ein Drittel der Dis- 
kette Platz, also sind drei Durch- 
gänge notwendig. Da das Floppy- 
laufwerk zirka 300 Zeichen pro Se- 
kunde liest und 170 000 Zeichen zu 
übermitteln sind, dauert allein das 
Lesen der ganzen Diskette schon 
zehn Minuten. = 
Abhilfe schaffen schnellere Über- 
tragungsroutinen. Da aber auch 
die Betriebssystemroutinen in der 
Floppy umständlich und langsam 
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geschrieben sind, kommt man mit 
einer Beschleunigung der Über- 
tragung nur auf eine Geschwin- 
digkeitssteigerung vom Faktor 2. 
Man muß sich also seine eigenen 
Routinen zum Lesen und Schrei- 
ben der Sektoren schreiben. Die- 
se werden zusammen mit den 
schnellen Übertragungsroutinen 
im Floppy-RAM-Speicher abge- 
legt und bilden ein neues Be- 
triebssystem, das auf Befehl des 
Computers Sektoren liest, 
schreibt und verifiziert und ganze 
Spuren formatiert. In Verbindung 
mit dem Hauptprogramm im Com- 
puter, das die Routinen ins Lauf- 
werk überträgt und kontrolliert, 
kann nun mit Höchstgeschwindig- 
keit kopiert werden. 


Leerkopie in nur 
50 Sekunden 


Weiterhin wird dadurch Zeit ge- 
spart, daß leere Sektoren nicht ex- 
tra in die Floppy übertragen wer- 
den, sondern gleich bei der For- 
matierung geschrieben werden. 
Blitzcopy erkennt Leersektoren 
am Inhalt erstes Byte = $4b, restli- 
che Bytes = $01. Das Kopieren ei- 
ner leeren Diskette dauert des- 
halb nur 50 Sekunden. 

Blitzcopy ist alsıkombinierter Hex- 
dump-Basiclader abgedruckt 
(Listing 1). Wie man mit dieser Art 
Listing umgeht, steht auf Seite 6. 
Wird das Programm als Basic- 
lader eingegeben, so muß es vor 
dem Start unbedingt abgespei- 
chert werden. Das fertige Maschi- 
nenprogramm kann nach dem 
Einpoken der Daten mit 

POKE 43, 1:POKE 44, 8 

POKE 45, 0:POKE 46, 24 

SAVE "NAME!',8 

auf Diskette abgespeichert wer- 
den. Wird es als Hexdump einge- 
geben, muß der Checker benutzt 
werden. Als Startadresse ist 0801 
anzugeben. 

Geladen und gestartet wird Blitz- 
copy mit 

LOAD"NAME",8 

RUN 


(Florian Zeiler) EEEEEEEEEEEE 


020,08,C2,07,93E,28,32,33, 
38,36,29,09,00,00,00,00, 
00,00,05,09,00,00,99,00, 
02,00,020,00,00,00,00,80, 
00,10,50,C9,40,50,00,FF, 
20,30,00,F0,60,70,00,30, 
AD,BO,RDO,DO,EO,FF,00,08, 
02,01,00,02C,94,05,00,FF, 
02,03,02,0F,06,07,990,09, 
0R,0B,00,00,0E,FF,00,02, 
00,00,01,00,00,80,08,00, 
02,00,020,00,00,00,00,00, 
00,00,10,00,00,10,01,00, 
. 28,20,00,00,00,020,00,00, 
292,00,29,00,00,C0,0C,00, 
00,00,00,09,00,40,04,00, 
00,00,28,00,00,50,05,00, 
00,00,00,00,00,00,00,00, 
00,20,04,00,00,FF,OF,00, 
00,22,00,00,00,20,02,00, 
00,08,40,00,00,30,03,00, 
00,00,20,00,00,00,00,00, 
00,00,80,00,00,F0,0F,00, 
00,00,00,00,00,60,06,00, 
00,29,00,00,00,70,07,00, 
00,20,00,00,00,00,00,00, 
00,00,00,20,00,30,09,00, 
00,00,00,00,00,RD2,0n,0D, 
00,020,00,00,00,E0,08B,00, 
002,00,00,00,00,00,00,00, 
00,200,00,090,00,00,00,00, 
20,00,00,00,00,E0,0E,00, 
00,09,00,00,00,FF,®F,00, 
00,20,20,00,00,00,90,00, 
09,00,20,00,00,00,00,00, 
00,00,00,00,00,00,00,00, 
00,00,020,00,00,00,020,00, 
212749,10,11.10,13,15, 
00,10,20,39,40,59,60,70, 
80,30,R0,B0,C0,D0,E9,Fo, 
00,00,30,31,32,33,09,00, 
e0,FF,00,01,00,FF,00,01, 
00,4C,6D,0A,A9,0B,80,00, 
DD,A2,03,AD,00,DD,10,FB, 
BE,00,D0D,B3,00,18,R2,08, 
BE,00,DD,AA,29,F0,8D,00, 
DD,4A,4A,29,F0,8D0,99,DD, 
BA,29,D0F,AA,BD,31,09,8D, 
09,DD,4A,4A,29,F0,8D,09, 
DD,CB,EA,EA,EA,D®O,D4,RS, 
03,80,20,D0D,60,A9,2B,8D, 
00,DD,A2,03,AD,00,DD,1®, 
FB,8E,00,DD,EA,E£EA,AS9,0B, 
ED,00,DD,EA,EA,A9,03,8D, 
20,DD,AE,20,DD,BD,30,08, 
AE,00,DD,1D,20,08,EA,RE, 
00,DD,1D,09,08,AE,00,DD, 
1D,10,08,39,00,18,CB,D®, 
D3,50,A9,0F,A2,08,R0,0oF, 
20,BA,FF,A9,00,20,BD,FF, 
20,C0,FF,A9,00,85,60,n9, 
14,85,61,49,00,8D,E9,13, 
A9,04,8D,EN,13,A2,0F,20, 
CS,FF,AB,00,B3,E6,13,20, 
D2,FF,C8)C0,96,00,FS,Rr2, 
23,R8,00,B1,60,20,D2,FF, 
EE,E9,13,D8,03,EE,EA,13, 
E6,60,D00,02,E6,61,CA,D®, 
E8,20,CC,FF,AS,61,C9,15, 
S0,CB,A2,0F,20,C9,FF,rD, 
00,B3,EC,13,20,D02,FF,CB, 
C2,05,D0,F5S,20,E7,FF,#9, 
3F,8D,02,DD0,A9,03,8D,00, 
DD,78,20,BE,11,A9,15,8D, 
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66,03,A0,00,20,55,09,#9, 
16,80,66,09,A0,00,20,55, 
093,49,17,80,66,03,A0,00, 
208.55.09.60.19.0A.80.03 
08,49,33,20,02,FF,20,D6, 
0B,n9,00,85,02,20,BF,0C, 
20,6R,0B,20,61,0C,20,E6, 
0B,C3,00,00,03,4C,AD,on, 
C9,01,00,03,4C,63,0E,C9, 
02,00,03,4C,B6,0E,C9,03, 
D0,03,4C,BD,0E,C9,04,D0, 
DD,4C,2E,0B,20,D6,0B,#9, 
02,02,08,R0,00,20,BA,FF, 
A2,E4,A0,13,419,01,20,BD, 
FF,20,CO,FF,A2,02,20,C6, 
FF,20,CF,FF,AS,90,D0,4D, 
20,CF,FF,A9,0F,80,ES,13, 
CE,E5,13,00,12,A2,95,rD, 
13,20,n2,0B,20,49,0C,B®, 
34,20,D6,0B,4C,D4,0n,20, 
CF,FF,20,CF,FF,FO,06,99, 
00,20,D2,FF,20,E6,0C,20, 
CF,FF,AA,20,CF,FF,20,C0D, 
BD,A9,20,20,D2,FF,29,CF, 
FF,FO,CS,A4,90,00,06,20 

D2,FF,4C,0F,0B,20,CC,FF, 
A9,02,20,C3,FF,A9,00,20, 
D2,FF,4C,7E,0A,A9,0F, 20, 
C3,FF,A2,75,A0,13,20,n2 
OB,n93,0F,A2,08,A®,0OF,20, 
BA,FF,A9,00,20,BD,FF,2®, 
Co,FF,A2,OF,20,C9,FF,20, 
CF,FF,20,D2,FF,C9,0D,DO, 
F6,20,CC,FF,A2,8F,AQ,13 


2e0,A2,08,20,06,0B,4C,7E,, 


On,A9,0F,80,18,04,A9,00 
8D,06,D4,8D,04,D4,8D,00, 
D4,80,05,D4,A9,0C,8D,01, 
D4,A2,00.A®,1E,CA,D®,FD, 
88,D®,FA,n9,FC,8D,06,D4, 
8D0,06,D4,#9,15,8D,04,D4 
8D,04,D4,A9,14,8D,04,D4, 
60,86,64,84,65,A0,00,B1, 
64,F0,29,C9,40,F®,0B,20, 
D2,FF,ES,64,DO,EF,E6,65, 
DaO,EB,C8,B1,64,AR,CB,Bl 
64,20,D2,FF,CA,DO,F8,18, 
AS,54,69,03,85,64,90,DS, 
ES,65,00,01,60,19,00,80D, 
20,D0,8D,21,00,n2,3B,ro, 
12,20,R2,0B,60,09,00,85, 
C6,A9,81,8D,0E,DC,20,24 
0C,20,E4,FF,FO,FB,C9,iD 
F0,0B,C9,11,F0,16,C9,0D 
DO,EF,AS,02,60;A5,02,69 
00,C9,05,30,02,R9,00,85 
02,4C,EF,0B,n5,02,E9,01 
C9,00,10,02,R9,04,85,02 
YC,EF,0B,AQ,28,B9,FF,03 
29,7F,99,FF,03,88,D0,FS, 
AS,02,or,on,on,ES,D2,AB 
C8,A2,06,89,02,04,09,80 
99,02,04,C8,CA,DO,F4,60, 
58,49,40,85,CB,A9,81,BD, 
0E,DC,AS,CB,C9,3F,F0,06, 
C9,40,F0,F6,18,60,38,60, 
AD,OF,DE,29,7F,8D,0F,DC, 
AD,0E,DC,09,80,8D0,0E,DC, 
A9,00,8D0,0B,DC,8D,@A,DtL, 
80,09,DC,80,08,DC,6®,rD, 
OB,DC,AD,OA,DC,20,R6,0C, 


8D,31,07,A9,3A,8D,92,07, 3 


AD,093,DC,48,28,AB,0C,3D, 
33,07,68,?70,A6,0C,8D,34, 


Sonderheft 2 Un 87 


> 


58 gun 


07,#D,08,DC,58,29,0F,0s, 
30,60,4A,4A,4A,4A,09,38, 
60,A93,20,80,08,DC,50,rD, 
08,DC,80,08,DC,59,A9,0D, 
280,0D2,FF,29,E5,0C,nR2,00, 
A9,08,20,B4,FF,A9,6F,20, 
9S6,FF,28,A5S,FF,C9,00,Fo, 
08,20,D2,FF,E8,E®,1E,D®, 
F1,20,AB,FF,60,49,1D,20, 
D2,FF,A9,1D,20,D2,FF,60, 
18,45,68,65,59,85,70,8D, 
0D,90E,AS,SA,FO,04,A9,18, 
85,70,R0,01,A9,34,85,®01, 
A9,FF,8B5,6F,A9,02,85,6R, 
A9,18,85,6E,A9,00,85,6D, 
AS,70,8D,6A,00,80,8D,0D, 
80,DD,®D,8D0,E0,0D,8D,rB, 
0D,8D,E3,0D,8D,E6,0D,8D, 
CB,2D,8D,E9,00,8D0,EC,0D, 
8D,EF,0D,8D,F2,8D,DO,on, 
B1,60,85,6C,29,F8,85,6£, 
C8,0D8,06,49,03,85,6E,AB, 
ED,B1,6D, 9A, 26,6C,0n,#5, 
6C,2A,29,1F,AA,BD,2F,08, 
AS,6B,10,0E,08,A6G,6F,SD, 
008,FF,B1,6D0,4A,29,1F,An, 
C8,B1,60,6A,29,F8,85,6C, 
BD,17,08,A6,6C,1D,OF,08, 
E6,6F,D0,04,C6,6R,Fo,4C, 
A6,6F,SD,00,FF,B1,6D,28, 
OF,85,6C,C8,B1,60,85,68B, 
OAR,26,6C,29,F8,AnA,BPD,OoF, 
08,A6,6C,1D,17,08,A6,6F, 
SD,01,FF,C8,B1,6D,66,6B, 
6N,66,6B,6N,29,F8,An,Bl, 
60,29,1F,C8,85,6B,BD,®E, 
08,A6,6B,1D,2F,08,A6,6F, 
9D,02,FF,BA,18,69,03,85, 
6F,4C,41,0D,A4,5A,D9,39, 
ADB,1F,59,00,FF,59,20,FF, 
59,40,FF,59,60,FF,59,80, 
FF,59,AO,FF,59,C0,FF,59, 
EO,FF,88,10,E5,85,6C,AD, 
01,18,29,C0,4D,090,18,49, 
95,85,67,49,37,85,901,60, 
A0,00,E3,00,FF,D93,00,18, 
D0,04,C8,D0,F5S,2C,A,01, 
84,6C,A0,00,84,67,4C,04, 
0E,18,45,68,65,61,85,70, 
A9,34,85,01,R9,00,85,6F, 
AO,00,B1,6F,80,20,18,85, 
SE,C9,4B,F0,03,49,01,2C, 
A9,00,85,5F,C8,B1,6F,39, 


002,18,C9,01,F0,04,R2,01,: 


86,5F,45,5SE,85,5E,C8,D®, 
EC,A3,37,85,01,A5,5F,C9, 
01,60,R9,31,85,57,20,61, 
0C,29,B2,0C,20,06,0B,20, 
D3,09,AR9,12,85,56,49,00, 
85,5n,n9,01,85,58,A3,0C, 
85,59,20,EC,0E,A9,0C,85S, 
58,49,17,85,59,E6,57,20, 
EC,OE,A93,17,85,58,A9, 24, 
85,593, E6,57,20,EC,0E,#3, 
30,85,57,20,80,11,A9,06, 
28,AD,10,20,CE,11,58,29, 
DD,8D,4C,81,0%,49,34,85, 
57 ,4C,67,0E,20,61,0C,20, 
B2,0C,20,06,9B,20,D3,05, 
A9,14,85,57,49,12,85,56, 
A3,00,85,5R,R9,21,85,58, 
A9,13,85,59,20,EC,@E,#3, 
13,85,58,49,24,85,59,4C, 
90,0E,FF,A9,01,20,80,11, 
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A2,AA,AO,13,20,n2,08B,#5, 
57,C9,32,30,04,09,34,990, 
1E,AS,56,85,FC,99,900,85, 
FF,A9,05,20,AD,10,A9,00, 
8D,CE,09,A0,FA,20,36,09, 
AS,FA,F0,03,4C,07,0E,nS), 
04,A4,5A,D2,01,2C,n9,05, 
85,54,49,19,85,68,A5,50, 
28,09,11,85,62,8n,85,FE, 
20,E5,11,19,00,85,61,85, 
50,%9,01,85,63,15,60,85, 
FE,AS,62,85,FD,A9,0n,85, 
53,49,0A,85,52,n4,53,B9, 
47,09,F0,04,19,02,85,52, 
A4,53,89,47,09,85,FF,A5, 
61,85,FC,A9,01,20,AD,10, 
AD,BA,03,85,51,20,F1,0C, 
A9,03,80,CE,09,R0,Bn,20, 
96,09,419,18,80,CE,09,A®, 
00,20,36,09,C6,63,F0,0C, 
AS,51,D0,29,05,67,00,20, 
AS,6C,DO,1F,20,0C0,12,90, 
BF,20,F1,0C,A5,50,85,61, 
AD,BA,03,00,10,A5,67,D®, 
07,n5,6C,D0,06,4C,D2,0or, 
A3,04,2C,A9,05,A4,50,99, 
3C,03,C6,52,D0,D6,C6,53, 
F0,07,45,50,85,61,4C,52, 
OF,20,BA,10,EE,20,D0,45, 
57,C9,14,F0,07,A5,68,18, 
65,62,85,68,E6,60,45,69, 
CS,59,F0,03,4C,2F,OF,AS, 
57,C9,14,F0,11,A5,57,C9, 
34,90,0C,A5,5N,49,01,85, 
5A,F0,03,4C,EC,0E,60,49, 
02,20,80,11,49,19,85,68, 
A9,06,85,54,15,60,20,D3, 
11,85,52,8A,85,FE,n9,04, 
85,53,20,E5,11,49,00,85, 
6C,A9,00,85,61,A5,60,85, 
FB,A9,00,85,FC,AS,62,85, 
FD,A9,00,85,FF,n9,03,20, 
AD,10,A5,61,85,FC,20,22, 
OE,90,15,R5,6C,45,5E,85, 
6C,A9,02,20,AD,10,R9,18, 
80,66,09,A0,90,20,55,09, 
20,0C,12,30,DD,A93,00,85, 
FC,A9,04,20,AD,10,49,00, 
8D,CE,09,R0,FA,20,96,09, 
AS,FC,D0,03,4C,A7,0E,AS, 
FB,D0,09,A5,FA,C5,5C,D®, 
03,4C,37,10,C6,53,F0,03, 
4C,23,10,20,14,11,A5,68, 
18,65,62,85,68,E6,60,#5, 
60,C5,59,F0,06,EE,20,D®, 


'4C,15,10,60,85,FA,A9,00, 


80,56,09,R0,FA,20,55,09, 
69,49,00,20,D2,FF,20,E6, 
OC,AS,FB,20,F2,11,49,20, 
20,D2,FF,AO,00,B39,3C,03, 
D0,0D,A9,2E,05,54,20,D2, 
FF,C8,C4,FD,D®,EF,60,An, 
A9,12,20,D2,FF,ED,41,09, 
20,D2,FF,A9,92,20,De,FF, 
18,98,48,65,68,85,70,#9, 
34,85,01,A0,00,84,6F,R9, 
01,91,6F,C8B,D®,FB,R9,4B, 
91,6F,A9,37,85,01,68,AB, 
4C,DA,10,A2.CD.A9.13.20. 
A2,0B,A5,60,20,F2,11,#9, 
0D,20,D2,FF,60,48,45,57, 
8D,7E,06,R0,00,n2,70,nD, 
C4,49,7F,85,54,84,65,85, 
66,AR2,0C,20,64,11,29,24, 


DATA 0C,68,C9,30,F0,1C,C3,01, 49,02,11,00,0D0,0D,1D,ıD, 
DATA 09,07,R2,79,A0,04,4C,56, 53,54,4E,507E6,53,50,41, 
DATA 11,R2,60,A90,05,86,64,84, 43,45,20,54,41,53,54,45, 
DATA 65,A9,FF,B5,66,A2,06,20, 002,1D,1D0,1D,1D,1D,11,12, 
DATA 64,11,60,A9,05,B1,64,09, 30,92,31,32,33,34,35,36, 
DATA 809,25,66,91,64,88,10,F5, 37,38,39,12,31,92,31,30, 
DATA AS,64,18,69,28,85,64,50, 33,34,35,36,37,38,39,12, 
DATA 02,E6,65,CA,D9,ES,690,29, 32,92,00,00,1n,1D,12,57, 
DATA 26,11,20,CE,11,20,B2,0C, ; 52,49,54,45,20,45,52,52, 
DATA 20,80,0C,A5,57,C9,30,F®, yF,52,92,20,54,52,41,43, 
DATA OF,20,E%,028,20,49,0C,30, 4B,290,00,24,08,4D,2D,57, 
DATA 11,A9,30,85,57,20,26,11, 00,04,23,4D,2D,45,10,04, 
DATA A2,F8,BA,20,BE,11,78,4C, -31,35,00,FF,13,EC, 04,46, 
DATA A7,0E,20,BE,11,20,06,08, 44,41,20,23,30,00,1F,00 
DATA 20,EB,0C,A9,80,8D,0E,DC, 20,00.990,10,398,490,C0,08 
DATA AS,58,85,60,60,A9,0B,8D, 02,00,08,01,03,04,0C,78 
DATA 11,D8,AD,11,00,10,FB,RD, BO,AA,04,A9,05,20,26, 04, 
DATA 11,00,30,FB,60,A9,1B,BD, A9,06,20,26,04,A9,07,20, 
DATA 11,00,A9,00,80,20,D9,60, 26,04,4C,EC,05,8D,A0,04, 
DATA A2,04,D0D,28,09,CA,BO,Fn, RA0,00,20,67,04,60,AD,00, 
DATA ED,2D,09,60,A0,3C,A9,03, 18,10,F8B,A9,10,80,00,18, 
DATA 99,00,03,C8,C0,52,D0,F8, B9,00,03,85,0F ,4A,4A,4n, 
DATA 60,n2,30,86,4F,38,E9, On, 4A,AE,00,18,10,FB,8D,00, 
DATA 30,04,E6,4F,DO,F7,69,3#, 18,0n,29,0F,80,00,18,AD, 
DATA 48,AS,4F,20,D2,FF,68,20, OF,20,29,0F,80,00,18,0N, 
DATA D2,FF,60,49,00,R4,61,99, 29,0F,80,090,18,C8,D9,D8, 
DATA 3C,03,84,50,A9,15,85,4F, A2,OF,8BE,00,18,60,R2,10 


’ 


’ 


DATA: 18,A5,61,65,54,85,61,C5, AD,00,18,10,FB,BE,00,18, 
DATA 62,90,05,38,E5,60,85,61, EA,EA,A9,00,80,00,18,ER, 
DATA A8,B9,3C,03,F0,02,18,60, EA,AD,00,18,10,FB,EA,En, 
DATA EB,61,45,61,C6,4F,D®,E7, AE,00,18,BD,00,04,EA,AE, 
DATA 38,69,13,8E,08,34,03,20, 00,18,10%02,04,EA,En,En, 
DATA 43,41,54,41,4C,47,20,42, AE,00,18,1D,08,04,EA,AE, 


DATA 41,43,4B,55,50,20,56,45, 00,18,1D,0N,04,99,00,03, 
DATA 52,49,46,59,20,54,45,53, C8,D0,06,n?,®OF,BE,00,18, 
DATA 54,45,52,20,43,4F ,4D,41, 60,A9,10,80,07,1C,A9,00, 
DATA 4E,44,0D,B0,40,25,C0,AE, 85,20,85,3F,85,50,8D,FE, 
DATA 2D0,DD,40,1F,20,B0,C0,C0, 02,R9,FF,85,3E,R9,00,85, 
DATA C0,CO,AE,DD,0D0,DD,40,1F, 30,49,03,85,31,18,60,Bn, 
DATA 20,0D,46,52,4F,4D,DD,DD, 86,49,R9,EE,8D,0C,1C,60, 
DATA 0D,DD,49,1F,20,DD,20,D5, AS,FF,80,05,18,2C,05,18B, 
DATA C9,29,00,DD,00,DD,40,1F, 10,2N,2C,00,1C,30,F6,AD, 
DATA 20,0D,29,CA,CB,20,DD,DD, 01,1C,B8,n0,00,18,50,38, 
DATA 0D,DD,40,1F,20,DD,20,DS, 60,AE,00,1C,E8,8N,29,03, 
DATA C9,20,DD,DD,00,DD,4®,1F, '85,4B,AD,00,1C,29,FC,05, 
DATA 20,AD,CO,B1,81,C0,BD,DD, 4B,BL,00,1C,A9,90,8D,05, 
DATA 00,0D,40,1F,20,B0,C0,C0, 18,AD,05,18,30,FB,60,RE, 
DATA CO,CO,AE,DD,0D,DD,40,1F, 0@0,1C,CA,8A,29,03,4C,F1, 
DATA 29,0D,20,54,4F,20,D0D,DD, 04,85,22,85,18,04,65,FF, 
DATA 0D,DD,49,1F,20,0D,20,05, 85,F0,A5,F1,C5,F®,F0,10, 
DATA C9,20,00,DD,0D,DD,40,1F, BO,07,20,EA,04,E6,F1,D®, 
DATA 20,0D,29,CA,CB,20,DD,DD, F1,20,08,05,C6,F1,D00,En, 
DATA 0D,DD,40,1F,20,D0D,20,D5, AS,FE,On,On,On,On,on,85, 
DATA. C9,20,DD,DD,0D,DD,4®,1F, 4B,AD,00,1C,29,9F,05,4B, 
DATA 20,AD,CO,B1,B1,C0,BD,DD, 8D,00,1C,60,AS,12,85,16, 
DATA 00,0D,40,1F,20,20,50,41, AS,13,85,17,"5,FB,85,18, 
DATA 53,53,28,DD,00,DD,40,1F, AS,FC,85,19,45,16,45,17, 
DATA 20,20,20,30,30,20,20,DD, 45,18,85,1A,20,34,F9,n9, 
DATA 0D,DD,40,25,20,DD,2D,DD, 200,85,00,20,C8,04,n2,28, 
DAIA 40,1F,20,20,54,49,4D,45S, 22,38,F5,45,00,C9,02,60, 
DATA 20,0D0,0D0,0D,49,1F,20,50, , 20,C8,04,20,D1,04,50,FE, 
DATA CO,C0,CO,CO,AE,DD,2D,DD, , BB,AD,01,1C,39,90,03,C8, 
DATA 40,1F,20,0D,20,20,84,20, DO,F4,AQ,BD,S0,FE,B8,AD, 
DATA DD,DD,0D,DD,4®,1F,20,DD, ®1,1C,39,00,01,C8,D0,F4, 
DATA 20,CD,B4,20,DD,DD,0D,DD, 60,49,EE,8D,0C,1C,n2,09, 
DATA 40,1F,20,DD,20,20,20,20, AO,00,20,C9,FD,AD,0C,ıC, 
DATA DD,DD,00,0D,40,1F,20,0D, 29,1F,09,C0,8D,@C,1ıC,ns, 
DATA 30,34,30,30,DD,DD,20,DD, FF,8D,03,1C,A9,FF,8D,01, 
DATA 48,1F,20,ARD,C0,C0,C0,C®, 1C,A2,05,R0,00,84,F9,20, 
DATA ED,DD,0D,AD,49,25,C0,BD, C9,FD,AQ,BB,B9,00,01,50, 
DATA 13,11,11,090,13,49,15,11, FE,B8,80,01,10,45,F9,85, 
DATA AD,40,25,C0,BD,1D,05,49, F9,C8,00,F0,B9,00,03,50, 
DATA 77,20,40,77,90,43,4F,4D, 7 FE,B8,8D0,01,1C,45,F9,885, 
DATA 4D,41,4E,44,20,00,9n,13, F9,C8,C0,FE,DO,EE,'5®,FE, 
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ISET 
15E3 
IS 
15F9 
1601 
1609 
1611 

1619 
1621 

1629 
1631 

1639 
1641 

1649 
1651 

1659 
1661 
1669 
1671 
1679 
1681 
1689 
1691 
1699 
16A1 
16A9 
16B1 
1659 
16C1 
16C9 
16D1 

16D3 
16E1 

16E39 
16F1 

16F9 
1701 

1703 
1711 

1719 
1721 

1723 
1731 

1739 
1741 


4458 
4462 
4470 
44B® 
4490 
4520 
4510 
4528 
4530 
4540 
45598 
4568 
4570 
4580 
4599 
4608 
4610 


"4620 


4530 
4640 
4550 
4650 
4570 
4680 
4690 
4700 
4710 
4720 
4739 
4748 
4750 
4760 
4770 
4780 
4799 
4800 
4810 
4820 
4839 
4840 
4850 
4860 
4870 
4880 
4830 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


BB,50,FE,A4,FC,AS,F9,3s, 
80,21,68,A9,00,8D,AD,04, 
AQ,FA,20,567,04,AB,FA,Ca, 
F@,18,CA,D0,03,4C,33,86, 
CA,D0,03,4C,2A,07,CA,Do, 
03,4C,BF,06,C9,D9,03,4C, 
3F,06,4C,AD,EA,AS,FB,20, 
12,05,20,45,05,B0,05,20, 
71,95,R9,00,80,BA,01,#39, 
01,8D,3B,04,A0,Bn,20,orF, 
04,19,03,8D,3B,04,A0,00, 
20,2F,04,4C,EC,05,49,02, 
85,F8,R9,05,8D,08,1C,A3, 
F@,20,FF,04,A9,04,8D,00, 
1C,AS,FC,85,06,99,14,85, 
F9,A9,B0,85,00,58,A5,00, 
30,FC,49,21,F9,14,C6,F9, 
DO,EF,C6,F8,F0,0R,A9,C0, 
85,00,15,00,30,FC,10,DD, 
AS,FF,85,FA,78,20,An,04, 
A9,00,8D,3B,04,A®,FA,20, 
OF ,04,AS,22,04,85,F1,4C, 
EC, 05,49,03,80,A2,04,A®, 
00,20,67,04,20,E9,F5,85, 
3A,45,F8,85,F8,20,8F,F7, 
20,45,05,B0,09,20,392,05S, 
29,00, FE,4C,EC,05,A9,FF, 
80, 96,02 ,4C,EC,05,R2,0n, 
86,32,20,45,05,B0,48,20, 
CB,04,20,01,04,A2,43,n0, 
01,49,00,50,FE,B8,4D,01, 
IC,CA,DO,F7,88,18,F4,A4, 
FC,59,80,01,00,29,E6,FC, 
AS,FC,C5,FD,F®,1F,20,01, 
04,A2,093,n4,32,50,FE,B8, 
B9,00,02,4D,01,1C,DO,0r, 
C8,Ch,DO,F1,18,A45,32,69, 
ON,85,32,30,BA,A9,00,85, 
FB,A5,F8,85,FA,AD,90,1C, 
23,10,85,FC,49,00,80,38, 
04,A®,FA,20,2F,04,4C,EC, 
05,R9,00,85,F8,45,FB,20, 
12,05,20,C8,04,A0,00,#8, 
08,39,08,03,A5,FC,33,02, 
03,A5S,FB,39,03,03,45,13, 


77 1749 
45 1751 
EE 17583 
12 1761 
CE 1769 
21 1771 
o4 1779 
23 1781 
uo 1789 
83 1791 
A393 1733 
36 17P1 
31 17A9 
FB 17B1 
DB 1769 
cB 17C1 
24 17C9 
7D 1701 
g1 17D3 
33 17E1 
38 17E3 
D7 17F1 
DD 17F9 
EA 
D7 
A7 
61 
2B 
AD 
19 
SB 
F3 
Bl 
31 
FO 
13 
1A 
B4 
F9 
SD 
c3 
85 
22 
AD 
S2 


4900 DAIA 39,04,03,A45,12,99,05,03, 6F 
4918 DAIA 45,13,45,FB,45,FC,99,01, 5E 
4920 DATA 03,49,0F,39,06,03,39,07, 66 
4938 DATA 03,38,18,69,08,AB,E6,FC, 65 
4940 DATA AS,FC,CS,FD,30,C9,C6,FC, 93 
4350 DATA 98,48,20,30,FE,68,R8,88, FS 
4960 DATA 22,E5,FD,20,F5,FD,n9,00, BO 
4978 DAIA B3,00,03,399,00,02,C8,0®, 19 
4980 DATA F7,A9,01,99,00,03,C8,D0, AB 
4990:DATA FA,A9,4B,80,00,03,20,E3, 43 
5000 DAIA F5,85,3A,20,8F,F7,n9,00, CB 
5912 DATA 85,32,AD,0C,1C,29,1F,09, FC 
5020 DATA C0,80,0C,1C,A9,FF,80,03, 57 
5038 DATA 1C,A9,55,8D,01,1C,A2,04, BF 
Se40 DATA 29,24,FE,AS,FF,8D,01,1C, AB 
5250 DATA A2,05,R0,00,20,C9,FD,A2, EE 
5060 DAIA On,A4,32,50,FE,E8,B9,00, 47 
5072 DAIA 02,80,01,1C,C8,CA,DO,F3, 35 
5080 DAIA A2,09,R0,00,29,69,FD,20, 6C 
5930 DATA AD,25,A2,04,R0,00,20,C3, 3B 
5100 DATA FD,A5,32,18,59,04,85,32, 23 
5110 DATA C6,FC,10,C7,20,00,FE,20, ıl 
5128 DATA AN,04,4C,EC,05,FF,23,00, 30 
60000 FOR A-2auS TO 6136 STEP 8: “ol 
S5=-9:C=0:FOR B=0 T2 7:60SUB 
69040 

60019 S-S+H+-L-E:C=5>255:5-255-5 5034 
AND 255:POKE A+B,H+L:NEXT 
B:GOSUB 60040 

80020 FS-"PRUEFSUNME OK":IF 5<> 5699 
H+L THEN FS="LRUSI 
PRUEFSUMMENFEHLER”: F=F+1 

60039 GOSUB 60099:NEXT A:PRINT ” ‚2267 
ECDOWNI"F"FEHLER”:END 

60040 READ HS:GOSUB 69050:H-L* 2719 

‘ 16:H$=NID$ CHS,2) 

60050 L+ASC CHSE+"X”)-4B: IF L<O 3198 
OR L>22 THEN 560080 

60069 IF L<10 THEN RETURN 1044 

60070 L=L-7:IF L>3 THEN RETURN 1334 

60080 FS="LRUSJIEINGABEFEHLER”:L= 2460 

O:F=F+1 
60030 PRINT "ZEILE” PEEK (64)* 2786 


eS6+PEEK (63)F$: RETURN 


“= 
SID 
GcR1 
GCR3 
GCR2 
GCRA 
BITO 
BITI 
BIT2 
BIT3 


ASSEHMBLER 


.oPT 
ZERERERERER EHER ERTL E RIEF ER RR 
set COMPUTERPROGRAMN ... 


ee 


; TABELLENANFANG 
;FUER GCR-BYTES 


; TABELLENANFANG 
;SERIELLER BUS 


„na nnannN 
” 
+ 
” 
o 
o 


$80,$00,$10, 
$C0,$40,850,0 
sFF,520,$30, 
sF0,560,570,0 
$90,$A0,$sBO,sA0 
$DO,SEO,$FF,O 
.BYT $08,$00,501, 0 
.BYT $0C,$04,805,0 


„BYT $SFF,$02,303,$02 SECAE 
.BYT SOF,$06,507,0 SECNO 
„BYT $09,$0A,$0B, 0 HIBIT 


.BYT $0D,$0E,$FF,D 
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0,0,0,$01,0,0,$80,58 
0,0,0, 0,0,0,800,$0 
0,0,0,810,0,0,$10,$1 
0,0,0, 0,0,0,0,0 
0,0,0,820,0,0,5C0,$C 
0,0,0, 0,0,0,$40,$4 
0,0,0,508,0,0,8350,$5 
0,0,0, 0,0,0,0,0 
0,0,0,$04,0,0,$FF,$sF 
0,0,0, 0,0,0,820,$2 
0,0,0,$40,0,0,$30,$3 
0,0,0, 0,0,0,0,0 
0,0,0,380,0,0,$F0,$F 
0,0,0, 0,0,0,360,$6 
0,0,0,500,0,0,$70,$7 
0,0,0, 0,0,0,0,0 
0,.0,0,$00,0,0,$90,$9 
0,0,0. 0,0,0,$A0,$A 
0,0,0,500,0,0,5B0,$B 
0,0,0, 0,0,0,.0,0 
0,0,0,800,0,0,85D0,sD 
0,0,0, 0,0,0,$E0,$sE 
0,0,0,$00,0.0,$FF,sF 
0,0,0,0,.0,0,0,0 
0,0,0,0,0,0,0,0 
0,0,0,0,0,0,0,0 
0,0,0,0,0,0,0,0 
0,524,$1F,s19,512 
$11,512,$13,$15 
0,510,820,530,$40 


s50,560,$70,580,$90,$A0 


.BYT $B0,$5C0,$DO,$EO,sFO 
FEHLER .BYT 0,0,530,$31,$32,$33 
POSIT .BYT 0,0,0,255,0,1,0 

.BYT 255,0,1,0 ;KOPFPOSITION 

JMP START 

;### UEBERTRAGUNGSROUTINE ### 

;s## COMPUTER -> FLOPPY ### 
coouT = * ANZAHL BYTES IN Y 

LDA #s0B ;ATN SETZEN 

STA $DDOO 

LDX #3 
c000 LDA $DDOo 

BPL COOO WARTEN AUF DATA 

STX $DDO0 ;ATN RUECKSETZEN 
COADR LDA $1800,Y ;DATEN HOLEN 

LDX #$0B 

STX $DDO0 ;ATN SETZEN 

TAX- 

AND #5F0O ;ATN RUECKSETZEN 

STA $DDO0 ‚BIT 4 UND 5 

LSR 

LSR 

AND #$F0 

STA sDDOO ;BIT 6 UND 7 

TXA 

AND #sOF 

TAX 

LDA HIBIT,X 

STA sDDOO ;BIT 0 UND 1 


c0Io 


CIADR 


TRANS1 LDX 


LDY 
TRANSO LDA 


LDX 
TRANSS LDY #0 


INC 
TRANS3 INC 


Inc 
TRANS4 DEX 


MEMEX 


LDy 
TRANS2 LDA 


"LDX 


BIT 2 UND 3 
;UEBERTRAGEN 


NOP 

BNE COADR 

LDA #803 

STA $DDO0 

RTS ’ 


;NAECHSTES BYTE 


’ 
;##% UEBERTRAGUNGSROUTINE ### 
‚s### COMPUTER <- FLOPPY ##% 


;ANZAHL BYTES IN Y 
;ATN SETZEN 


#WARTEN AUF DATA 
BPL 


;ATN RUECKSETZEN 


;ATN_SETZEN 


;ATN RUECKSETZEN 


;BIT 5 UND 7 
;BIT 4 UND 6 


;BIT 1 UND 3 


ORA BIT1,X 
STA $1800,Y 
INY 
BNE 
RTS 


;BIT 0 & 2 HOLEN 
;BYTE SPEICHERN 


coIl ;NAECHSTES BYTE 


PETTETTeT 
22222277 


FLOPPY-PRG ###32#44 
UEBERTRAGEN ####### 


;FILEPARAMETER 


;FILENAMENPARAMETER 
OPEN 

#<DOSANF 

860 

#>DOSANF 

61 

#500 


;(860) ZEIGER AUF 
;AKTUELLES BYTE 


STA ADRESSE IM FLOPPY 


JSR »CHD 15 


;M-W KOMMANDO 
JSR 
INY 
CPY #6 
BNE 
;ANZAHL BYTES 
»PRO DURCHGANG 
LDA 
JSR 
INC 
BNE 


>ADR. ERHOEHEN 
BNE 


BNE TRANSS 


SFFCC 


;SCHON 1.SEITE 


BCC ;VEBERTRAGEN 


JSR 
STARTEN 'M-E' 
JSR 
INY 
CcPyY #5 
BNE 


zCLRCH 


START 


MEN 
MENB 


MENO 
MENI 


MEN2 


MEN3 


MENA4 


MENS 


DIREC 


DIRC 
DIRA 


DIRB 


DIRO 


SFFE7 
#s3F 
sDD02 
#503 
sDDoo 


;CLALL 
;PORT 
;INITIALISIEREN 


DUNKEL 
#515 

COADR+2 ;REST VON ROUTINE 
#800 ;SCHNELL UEBERTRAGEN 


coour 
»s16 
COADR+2 
#500 
coout 
#s17 
COADR+2 
#800 
coourT 


»BILDSCHIRM AUS 


PETTITTerF HENUE #easnsunn000 


=50A 

80803 

#147 ;BILDSCHIRH LOESCHEN 
sFFD2 
SCRCLR 
LDA #0 
STA $2 


;BILDCHEN MALEN 
;AKTUELLER MEN.PUNKT 
OK00 ;FLOPPYMELDUNG AUSG 

;GONG 
zUHR LOESCHEN 


;MENUEAUSWAHL 
;AUSWERTEN 


MENO 
COMMAN 


KErTEFTT DIRECTORY #####242423 


;FILPARAM 2,8,0 


;FILENAME "s" 
OPEN 

;CHD 2 

»;GET 
»;STATUSABFRAGE 
;OB DISK DRIN 


;ZKEHLER EINTRAEGE 
»;PRO SEITE 


;BILDSCHIRM VOLL 
;MELDUNG AUSGEBEN 


;TASTE ABWARTEN 
BEI STOP ABBRUCH 
;SONST WEITER 
BYTES AUSLASSEN 


»ENDEMARKIERUNG 


;ABSTAND LASSEN 


»PRG-LAENGE AUSG. 


WWW HOMECOMPUTERWORLB ZOM 


DIREND 


COMMAN 


COMMO 


GONG 


GONGW 


PRINT 


PRINTO 


PRINTI 


PRINT3 


;FILENAME 
;NAECHSTER EINTRAG 


»CLOSE 2 


#15 
$FFC3 
#<COMTXT 
*>COMTXT 
PRINT 


;CLOSE 15 
TEXT AUSGEBEN 


;OPEN 15,8,15 


OUTPUT AUF 15 


;INPUT VON TAST. 
zANS FLOPPY 


;NAECHSTES ZEICHEN 


#<COMMEN 
#>COMMEN 
PRINT 
SCRCLR 
MEN 


zERRRuhER GONG ERFREREREREE 
.r 
LDA #15 
SID+24 
LDA #0 
SID+6 
SID+4 
SID 
SID+5 
#12 
SID+1 ;HI-BYTE FREQ 


LDX #0 
#30 


;LAUTSTAERKE 


;RELEASE 
;WELLENFORM 
;LO-BYTE FREQ. 
;ATTACK/DECAY AUS 


BNE GONGW 


GONGW ;WARTEN 
*$FC 
SID+6 
SID+6 
*21 
sSID+4 
SID+4 
#20 Ir 
SID+4 ;KEY RUECKSETZEN 


»SUSTAIN AUF 15 
RELEASE AUF 12 


»;SAEGEZAHN 


PErEreT) TEXTAUSDRUCK ######## 
; ($64),Y BIS ENDE (0) 


STX $64 ;ANFANGSADRESSE 
STY #65 IN POINTER (864) 
LDy #0 

LDA (864),Y 

BEQ PRINT2 ;ENDE 
CHP "5" ;WIEDERHOLUNG 
-BEQ PRINTI 

JSR $FFD2 ;AUSGEBEN 
INC #64 »;2AEHLER ERHOEHEN 
BNE PRINTO 

INC $65 

BNE PRINTO 

INY »#WIEDERHOLROUTINE 
LDA ($64),Y ANZAHL 
TAX 

INY 

LDA ($64),Y 

JSR SFFD2 ;AUSGEBEN 
DEX 

BNE PRINT3 ;WIEDERHOLSCHLEIFE 


CLC ;2UM ZAEHLER 
LDA $64 3 ADDIEREN 
ADC #3 


Sonderheft 2 um 91. 


PRINT2 


STA 564 
BCC PRINTO 
INC $65 
BNE PRINTO 
RTS 


;#### TITELBILD AUSGEBEN ###$ 


0 ;HINTERGRUND 
sD020 RAHMEN SCHWARZ 
sD021 

#<SCREEN ;ADRESSE 
#)SCREEN 

PRINT UND AUSGEBEN 


‚#tt### MENUE AUSWERTEN #se#### 


LDA #0 ;TASTATURPUFFER 
STA 198 ;LOESCHEN 
LDA #$81 ;TASTATUR INTERRUPT 
STA $DCOE ;ERMOEGLICHEN 
JSR BLACK FELD MARKIEREN 
JSR $FFE4 ;GET 
BEQ GTO 

CMP #29 ;CURSOR RIGHT 


;CURSOR DOWN 


;RETURN 


;ENDE, MEN.PUNKT IN A 
;CURSOR RIGHT 
»+1, DA CARRY SET 


»FELD MARKIEREN 
;CURSOR LEFT 


FELD MARKIEREN 
;REVERSE FELDER 
ENTFERNEN 

UND NEUES FELD 
;REVERS MARKIEREN 


;MENUEPUNKTNR. 
MAL 8 


*6 5 
s402,Y ;REVERS SETZEN 
#380 

$402,Y 


BL1 


*64 ;TASTENREGISTER 
203 ;LOESCHEN 
*s81 ;IRQ ERMOEGLICHEN 
$DCOE 

203 ;TASTATUR ABFRAGEN 


;STOP 


;CARRY SET BEI STOP 


;#### UHR AUF 0 STETZEN #4### 


= * 

LDA sDCOF 

AND #$7F zUHR ANWAEHLEN 
STA $DCOoF 

LDA $DCOE 
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#580 

SDCDE 

*$s00 

sDCoB ;STD 

$DCOA ;MIN 

$DC09 ;SEKUNDEN 
sDCo8 »ZEHNTEL AUF 0 


errereR ZEIT LESEN #ses#0##8 


sDCOoB ;STUNDEN 
$DCOA ;MINUTEN 

ULO EINER HOLEN 
$400+913 ;UND AUSGEBEN 
273 

5400+914 

sDC09 ;SEKUNDEN 


UHI ;ZEHNER HOLEN 
s400+915 ;UND AUSGEBEN 


ULO ;UND EINER 
$400+916 
sDCO8 


#soF ;EINER AUSWERTEN 
#s30 N 


»ZEHNER AUSWERTEN 


#330 


‚es#s8# ZEIT ANHALTEN ######4 


LDA #0 ;BEIM STD STELLEN 
STA $DCOB ;HAELT UHR AN 
RTS 


;t###### ZEIT STARTEN 4444888 


LDA sDCO8 ;BEIM’1/10 STELLEN 
STA $DCO8 ;LAEUFT UHR WEITER 
RTS : 


ErFeer FLOPPYMELDUNG ####### 


#13 

$FFD2 

DISPAC 

#0 ;ZAEHLER AUSG.ZCHN 
#508 

SFFB4 ;TALK 8 
*s6F 

$FF96 »SECTALK 15 
$FFA5S ;BYTE VON BUS HOLEN 
#13 

oK02 ENDE 
$FFD2 SONST AUSGEBEN 


#30 »BEI 30 AUFHOEREN 
OK01 


sFFAB >UNTALK 


»% CURSOR ZWEI FELDER LINKS € 
LDA #29 > 

JSR $FFD2 

LDA #29 

JSR $FFD2 

RTS 


‚es@®# GER — DECODIERUNG ##### 
;UND VERSCHIEBUNG IM SPEICHER 


:VON $17BA BIS $18FF 
;NACH SPEICHER 


68 ;ABLAGEADR. HI-BYTE 
;BERECHNEN 

‚ADRESSE F. VERIFY 

KEIN VERIFY 


;SONST BEI $1800 
;ABLEGEN 


DECODO = * 


#501 ;ZEIGER ZUM LESEN 
#534 

so1 ;ROM ABSCHALTEN 
*sFF 

s6F ;ZEIGER ZUM SPEICHERN 
#502 

s6A 

#$18 ;POINTER ZUM LESEN 
s6E ;(86D)=$1800 
#500 

s6D 

s70 

c0+2 ;ADRESSEN 
c1+2 »Z2UM ABSPEICHERN 
C4+2 ;AENDERN 
C5+2 

C2+2 

C6+2 

C7+2 

C3+2 

c8+2 

c9+2 

CAh+2 

CB+2 ;ERSTES BYTE 
DECO2 ;AUSLASSEN 


($s6D),Y 
s6c »GCR-BYTE 1 
#%11111000 

;TEIL 1 


Pe 


;BEREICH AB $03BD!t 
;AKTIVIEREN 


(s6D),Y 
s6C 


s6C 
*sıF ;TEIL 2 


GCR3,X ;ENTSCHLUESSELN 
s6B 
GCR2,X 
s6F ;ZUSAMMENSETZEN 
sFF00,X ;ABSPEICHERN 
($6D),Y 

;GCR BYTE 2 
*sıF TEIL 1 


($6D),Y 


;TEIL 2 
#%11111000 


;ABSP.ZEIGER ERH. 
DECOS ;NOCH NICHT FERTIG 
$6A ;SONST LETZTES BYTE 
DECO3 ;=PRUEFSUMMENBYTE 
s6F E 
$FF00,X 
($6D),Y ;GCR BYTE 
#s0F ;TEIL 
s6C 


(86D),Y 
s6B 


s6C 
#%11111000 


sFFOl,X 


($6D),Y ;GCR BYTE 
s6B 


s6B 
#%11111000 


($6D),Y 
*s1F 


$6B 
GCR2,X 


DECOD3 


DECOD1 
cc 


rare 


$FFO2,X 


*$03 
$6F 
DECOO ;NAECHSTE 4 BYTES 


PRUEFSUMME ####24% 


s##hhke KONTROLLIEREN ##nsR#R 


$5A 
DECODI 
#sır 
$FFO0,Y 
s$FF20,Y 
$FFA0,Y 
SFF60,Y 
$FF80,Y 
sSFFAO,Y 


»VERIFY FLAG 
s1=VERIFY 


' $FFCO,Y 


RTS 


s$FFEO,Y 


ca 
s6C 
#1801 
*#sCo0 
$1800 
#595 
567 
#537 
so1 


»PRUEFSUMME 
s<-MUSS 0 SEIN 


;KONTROLLE 
;HEADERKENNZEICHEN 
;<-MUSS 0 SEIN 


;ROM WIEDER EIN 


za0t# VERIFY SUBROUTINE ##### 


LDY 
LDA 
cHP 
BNE 
INY 
BNE 


DECoD2 L 


*0 
SFFOO,Y 
81800,Y 
DECOD2 


VERGLEICH DER 
;GELESENEN BYTES 
MIT DENEN IM 
SPEICHER 


„FEHLER PRUEFSUMME 


;HEADERBYTE OK 
DECOD3 


T### BLOCK AUF SCHREIBEN ### 


ai 3; 


VORBEREITEN *#+ 


(8$70),2 -> $1800,Y 


KErTIITEN 


LDA 
STA 
JSR 
JSR 


$68 
s61 
70 
#534 
sol 
#500 
s6F 


;ADRESSE ERMITTELN 
;ROM ABSCHALTEN 
;LO-BYTE ADR. 


#800 


($6F),Y 

$1800 ;1.BYTE UEBERTRAGEN 
$5E »;PRUEFSUMME 
#*s4B ;=$4B (LEERBLOCK) 
CODE2 


;FLAG KEIN LEERBLK 


;FLAG LEERBLOCK 


($6F),Y 
$1800,Y ;REST UEBERTRAGEN 
01 


KEIN LEERBLOCK 
;PRUEFSUMME 
»#ERNEUERN 


;ROM EIN 


;CARRY-GESETZT 
;BEI VOLLEM BLOCK 


KOPIEREN ######2#### 


a 
857 

UHRO 
UHRA 


;PASS 1 
;STOPPUHR AUF 0 
UND STARTEN 


COINIT 


CONOIN 


SCRCLR 
TRANS 


;BILD LEER 
»;FLOPPYPRG STARTEN 


218 
s56 
“0 
s5A ;VERIFY-FLAG 
*ı 
s58 
#12 
s59 
CoPI 
«12 
s58 
#23 
359 
857 
coPI 
#23 
s58 
#36 
59 
857 
coPpI 
wor 
557 
COSET 
*6 
MASTER 
HELL 


»1.SPUR 
;LETZTE SPUR +1 


»SPURBEREICH 
KOPIEREN 


s;DURCHGANG 2 


;DURCHGANG 3 
;ENDE 
;MELDUNGSROUTINE 


»;FLOPPYPRG ENDE 
BILDSCHIRM AN 


$BDDD ;FAC INITIALISIEREN 
MENB ;ZUM HAUPTMENUE 


Lesseesset VERIFY ##########4 


LDA #”4" 


»PASS 4 


STA 857 


JMP COPYo 


>ZUM KOPIEREN 


‚t4#4### DISK — TEST #4004038 


;FLOPPYPRG START 
PASS T 


;INITIALISIERSPUR 
»VERIFYFLAG 
»1.TEIL 1-18 


SPUREN EINLESEN 
»2.TEIL 19-35 


;ENDE 


PErTE) LESEN SPURBEREICH ###4$ 


: $58 BIS AUSSCHL.$59 
” 


* 

COSET "FROM "AKTIVIEREN 
#<TABELLE 
#> TABELLE 
PRINT 

57 

a" 2" 
COINIT 
sr 
CONOIN 


;TABELLENKOPF 


»BEI PASS 1UND4 
;INITIALISIEREN 


;INITIALISIEREN 
;INITIALISIERSPUR 


»;KOPFVERSTELLUNG 
sl=+.5 SFF=-,5 


„INITIALISIERBEF. 


CIADR+2 
=SFA 
COIN 
sFA 
CONOIN 
copy2 


ERGEBNIS HOLEN 


NICHT LESBAR 


*4 
s5A 
N& 


;BLOCKLESEABSTD.4 
;VERIFYFLAG 


WwWWW.HOMECOMPUTERWORLD: COM 


;INITIALISIERSPUR 


N6 


COPNEX 


.BYT s2C 


LDA 
STA 
LDA 
STA 


#5 
554 
#519 
$68 


»BEI VERIFY =5 
;ABSTANDSANGABE 
;ABLAGE 1.SPEICHER 
BEGINNT BEI $1900 


860 ;AKTUELLE SPUR 
TRSEC ;SEKTOREN BESTIMMEN 
s62 »SEKTOREN/TRACK 


;SPURBEREICH 
;BELEGUNGSPLAN 
ERSTER BLOCK 
;AKTUELLER BLOCK 
;LETZTER BLOCK 
»FLAG ERSTER BLK 
;IN DIESER SPUR 


TRACK 

;MAXIMUM 

#VERSTELLVERSUCHE 

;LESEVERSUCHE/SPUR 

POSIT,Y 
COPBLK 


+2 ;WENN NEBEN SPUR 
#52 ;DANN NUR 2 LESEVERS, 


;VERSTELLFAKTOR 


;NAECHSTER BLOCK 


353 
POSIT,Y 
sFF 
s6l 
sFC 


;VERSTELLFAKTOR 


;SEKTOR 


#1 


MASTER BLOCK LESEN 
$3BA 
s51 
DECODE 


;FEHLERFLAG 
;ALTEN DECODIEREN 


#503 
CIADR+2 
#sBA 
COIN 
#$18 
CIADR+2 
#500 
COIN 


;NEUEN EINLESEN 


;TEIL2 


s63 
CopIs 
s51 
CopIo 
s67 
COPIA 
s6c 
copıs 
SUCH ;NAECHSTEN BLK SUCH 
COPBLK ;ALLE GELESEN 
DECODE ;LETZTEN BLOCK 
s50 ;ENTSCHLUESSELN 
®61 ;WIRD ZUM NEUEN BLK 
s3BA ;FLOPPY FEHLER 
copI0 

$67 ;HEÄDER KENNZ. FEHLER 
COPIA 

$6C 
copI9 
copI1 


*s04 


;NOCH KEIN BLOCK DA 
; FEHLER VON FLOPPY 

;FEHLER HEADERKENNZ 
FEHLER CHECKSUM 


;PRUEFSUMMENFEHLER 


;NAECHSTE SPUR 
»22 NO BLOCK 


.BYT s2C 


#s05 
s50 
533C,Y 
s52 
cCOPIß 


53 
COPIl ;NAECHSTE VERSTELLG 
s50 
s61 
CoPLO 


»23 CHKSM BLK 
»SONST 20/21 
;IN TABELLE 


;NAECHSTER VERSUCH 


;NAECHSTEN LESEN 
SPUR FERTIG GELESEN 


READER 
$D020 
s57 
#20 
TT 
368 


;FARBE HOCHZAEHLEN 
;TEST-DURCHGANG 


;SPEICHERPOINTER 
UM GELESENE BLKS 


s62 »ERHOEHEN 


Sonderheft 2 um 93 


TT 


s68 
$60 ;TRACK HOCHZAEHLEN 
560 
59 
coPO SCHON FERTIG 
COPNEX ;NAECHSTE SPUR 


;#%#% SPURBEREICH SCHREIBEN ## 


coPoO 


VER 
cr 


COPON 


COPONO = * 


CoPoW 


CoPOSU 


COPOWP 


coPOO 


JMP 
COWER JSR 


; 
coPO1 LDA 


857 
#20 
VER ; TEST-DURCHGANG 
$57 
rar 
cr ; VERIFY-DURCHGANG 
$5A 
* 
$5A ;V=FLAG AENDERN 
VER 
CoPpI ;ZUM VERIFIZIEREN 
;FERTIG 
#2 
COSET ;'TO' AKTIVIEREN 
#519 ;SPEICHERPOINTER 
$68 
*6 
s54 :BLOCK ABSTAND 6 
;NAECHSTE SPUR 
s60 
TRSEC ;SEKTORZAHL HOLEN 
562 
;SPURBEREICH 
* 
$53 ;ANZ.SCHREIBVERSUCHE 
..  »NAECHSTER VERSUCH 
SECMAP ;UEBERSICHT ANL. 
#500 
$6C ;CHECKSUH GANZER TRK 
#0 
s6l ;AKTUELLER SEKTOR 
$60 
sFB ;TRACK 
#00 
SFC ;SECTOR 
362 
$FD ;MAXIMUM 
#0 
er : VERSTELLUNG 
* 
MASTER ;FORMATIEREN 
;NAECHSTER BLOCK 
s61 
SFC ;SEKTOR 
CODE ;VERSCHIEBEN 
coposU ;LEERBLOCK 
s6c 
s5E ;PRUEFSUHME AENDERN 
s6C 
#2 
MASTER ;BLK SCHREIBEN 
#518 ;UEBERTRAGEN 
COADR+2 
#300 
coour 
SUCH ;NAECHSTEN SUCH 
COPON ;NAECHSTER BLOCK 
*0 
$FC 
+ ;BEGINNEND M.BLK 0 
MASTER :VERIFIZIEREN 
#300 
CIADR+2 
*5FA 
COIN ;RUECKMELDUNG 
SFC :WRITE PROTECT 
COPOWP 
copy2 ;ENDE 
$FB ;WRITE ERROR 
COPOO 
$FA 
s6c 
coPoo 
copo1 
$53 
. COWER 
COPOND ;NAECHSTER VERSUCH 
WERRS ;FEHLERMELDG 
568 ; SPEICHERPOINTER 


94 KOM Sonderheft 2 
WWIEMHOMELOMPUTERWORLB COM 


COPOE 


MASTER 


READER = 


READEO 


READE2 


READE1 


READE4 


WERRS 


PASS 


;ERHOEHEN 


s62 
$68 
s60 
s60 
s59 
COPOE 
$D020 
COPON 


;TRACKZAEHLER 


FARBE ERHOEHEN 


BEFEHLSUEBERGABE FLOPPY # 
»;JOBNUMMER IN A 


COADR+2 
*sFA 


coouT »UEBERTRAGEN 


sFFD2 
*0 
8033C,Y TABELLE 
READEIl »BLK FEHLERHAFT 
ed z'." = BLOCK OK 
s5A BEI VERIFY '/' 
sFFD2 

;NAECHSTER BLOCK 
sFD 
READEO 


;FEHLERNUMMER NACH X 
+18 ;REVERS ON 
sFFD2 . 
FEHLER, X;ASCII-CODE HOLE 
$FFD2 ;FEHLERNR. :AUSGEBEN 
#146 ;REVERS OFF 
$FFD2 


$68 ;ADRESSE IM SPEICHER 


BESTIMMEN 


#s01 
($6F),Y 


BLOCK LOESCHEN 


READE4 
*54B 
(S6F),Y 
#337 
sol 


READE2 


‚s##2##2#4 SCHREIBFEHLER ###### 


#<WERROR 
#>WERROR 
PRINT 
560 

ZAHL 

«13 
sFFD2 


MELDUNG AUSGEBEN 
;SPURNUMMER " 


Kerr) PICTOGRAMM ANWAEHLEN ### 


;1=FROM 2=T0 


857 ;0=LOESCHEN 
367B ;PASS SETZEN 
*0 

#570 

#504 

*#s7F 

s64 ;KOORDINATEN 
$65 

s66 ;MASKE s011111111 
#12 ;12 ZEILEN 


PS2 ;PICTOGRAMME LOESCHEN 
BLACK ;MENUEPUNKT ANZEIG. 


PASS1ı 
PASS2 


PS3 


CosET J 


CEN 


COPIR 


DUNKEL 
DUNKO 


DUNKI 


HELL 


TRSEC 
TRSECO 


SECMAP 
SECHAO 


BNE 
RTS 


;ENDE 


#KOORDINATEN FROM 


;KOORDINATEN TO 


»AND-MASKE 


»+SETZ/LOESCH ROUT, 
X ZEILEN 
;BIT 7 SETZEN 
;AND MASKE 
(864), 


psı 
64 


#40 
64 
PS3 
65 


pP52 


;### NAECHSTEN DURCHGANG ### 


#rtt 


MELDEN *rr 


PASS ;PICTOGRAMM ANZEIG. 


;BILDSCHIRM AN 
zUHR ANHALTEN 
ZEIT AUSGEBEN 


4 


;LETZTER DURCHGANG 
:GONG 

;TASTE ABWARTEN 
;BEI STOP ABBRUCH 
;PIC'S LOESCHEN 


;STACK SETZEN 
;BILDSCHIRM AUS 


;ZUM ABBRUCH 


;WEITERMACHEN 
UHR STARTEN 


;INTERRUPT AUS 
1. TRACK ANGEBEN 


;BILD AUS 


BILDSCHIRM AN 


su0nst SEKTOREN/TRACK ###### 


sahne 


’ 

LDX 
CHP 
DEX 
BCS 
LDA 
RTS 
. ’ 


BESTIMMEN wer 


+4 
SECAE,X 


TRACK IN A 
VERGLEICH 


TRSECO 


SECNO,X ;ANZAHL HOLEN 


Zanker SEKTORUEBERSICHT ##### 


zarert 


LDy 
STA 


ANLEGEN “re 


*s3C 


#503 ;VORBELEGUNG ERR 21 
$0300,Y7 


#22+33C »22 BLOCKS 


BNE SECMAO 
RTS 


;### DEZIMALZAHL AUSGEBEN ### 
el ;IN A 
LDX #$30 

saF 


#10 »;ZEHNER ZAEHLEN 
ZAHLE 

sarF 

ZAHLO 


#10+$30 ;EINER ERMITTELN 
sar 
.s$FFD2 UND AUSGEBEN 


sFFD2 


‚rose 
sueRe 
LDA #500 
LDY s61 
STA $33C,Y 
STY $50 
LDA #21 
STA $4F 
CLC 

LDA $61 
ADC $54 
STA $61 
CHP $62 
BCC SUCHI 


NAECHSTEN SEKTOR #### 
SUCHEN “er. 


NEUEN BLOCK ALS 
»GELESEN KENN2. 
WIRD ZUM ALTEN 


;MAX.SEKTOREN 


zPLUS ABSTAND 
;NAECHSTER BLK 
KLEINER MAXIMUM 


SONST $62 AB2. 
s62 
s6l 


$s33C,Y 


SUCH2 SCHON GELESEN 


s61l ;NAECHSTEN 
s61 ;FREIEN BLK 
sarf 
SUCHO 

;ALLE GELESEN 


PEreereN DATENBEREICH ####+#$ 


= * 

.BYT 19,142,8,154 

„ASC "S CATALG BACKUP " 
„ASC "VERIFY TESTER COMAND" 


.BYT 
„ASC 
.BYT 
„ASC 
-BYT 
„ASC 


31 

" 0S$SS$S.o" 
13 

as" 

31 

" öFROMöO" 
13 

nos" 

31 

"© UI oo" 


Listing 2: Assemblerlisting von Blitzcopy, Computerteil 


ASSEMBLER 
‚opt 
“= 80400 
ASS ZSLZZZZTZITZFSTETTETTT 
‚art FLOPPYPROGRAHN .. 
LASSE SZ ZTZZTZETZETSTEITTT 
_ 81400 


DOSANF 

BITA - 
BITS - 
BIT6 - 
BIT? - 


.BYT 0,820,0,580 


“ 

” TABELLE SER. BUS 
“+2 

“+8 

“+10 


.BYT $10,530,$40,5C0 
«BYT 0,502,0,$08 
‚BYT $01,$03,$04,soc 


ZERO ;ZEROPAGE INITIAL. 
#505 

INFLO ;REST PROGRAMM 
2506 ;SCHNELL EINLESEN 
INFLO 

#507 

INFLO 

SLAVE ;AUFTRAG AUSFUEHREN 


STA FIADR+2 
LDY #800 
JSR FLIN 
RTS 


:##% UEBERTRAGUNGSROUTINE #44 
#48 FLOPPY -) COMPUTER ### 


51800 
FLOUT 
*$10 ;DATA SETZEN 
$1800 
50300,Y% 
soF 


WARTEN AUF ATN 


;DATEN HOLEN 


WARTEN AUF ATN 
BIT 5 UND 7 


;BIT 4 UND 6 


WAW HOMECOMPUTERWORLD COM 


„ASC "üs" 
-BYT 31 
„ASC " 05$S$$.0" 
.BYT 13 
„ASC "os" 
-BYT 31 
„ASC 

«BYT 13 
„ASC 

.BYT 

„ASC 

.BYT 

„ASC 

.BYT 

„ASC 

-BYT 

„ASC 

.BYT 

„ASC 


„ASC 
„BYT 
.ASC ® -5555=H" 
.BYT 13 
.ASC "5" 
.BYT 37 
„ASC "Sen 
.BYT 19,17,17 
.BYT 0 
COHTXT = * x 
19,64,21,17,173,64 
37,192,189,29,5 
64,119,32,64,119,157 
"COHNAND " 
0 


154,19,64,2,17,0 


.BYT 13,13 
.BYT "29,29 
„ASC "STOP/SPACE TASTE" 
.BIT 0 

. TABELLE .BYT 29,29,29,29,29 
.BYT 17,18,48,146 
.ASC "123456789" 
.BYT 18,49,146 
.ASC "123456789" 
.BYT 18,50,146 
-BYT 13,0 


WERROR .BYT 29,29,18 
-ASC "WRITE ERROR* 
-BYT 146 


.ASC " TRACK * 
.BYT 0 

DOLLAR .ASC 

DIRCNT .BYT 

MENU „ASC 

MEMWL .BYT $00 

MEMWH .BYT 504 
.BYT 35 


MEME .ASC "N-Er 
.BYT 510,504 


AND #soF 
STA $1800 
ASL 

AND #S0F 
STA $1800 :BIT 0 UND 2 
INY ;UEBERTRAGEN 
BNE -FOADR ;NAECHSTES BYTE 
LDX #soF 

STX $1800 

RTS 


»BIT 1 UND 3 


KITTY, UEBERTRAGUNGSROUTINE ### 
‚##@  FLOPPY <- COMPUTER '### 


LDX #$s10 
LDA $1800 
BPL FLINO 
STX $1800 
NOP 
NOP 
LDA #500 
STA $1800 
NOP 
NOP 

FLIN2 LDA $1800 


WARTEN AUF ATN 
;DATA SETZEN 


;RUECKSETZEN 


WARTEN AUF ATN 


Sonderheft 2 GW 95 


FIADR 


ZERO 


STACKS 


SYNC 


SYNC1 


SYNC2 


PLUS 


PLMI 


TIM 
PLMW 


MINUS 


FLIN2 


$1800 
BIT4,X 


BIT 4 UND 5 


$1800 
BITS,X 


»;BIT 6 UND 7 


$1800 
BITE,X 


;BIT 0 UND ı 


$1800 
BIT7,X 
50300,Y 


;BIT 2 UND 3 
;HOLEN 
»SPEICHERN 
;NAECHSTES BYTE 
FLIN2 
*sorF 
$1800 


ZEROPAGE INITIALISIEREN # 


*$10 
$1C07 
*#$00 
$20 
s3F 
$50 
s2FE 
*sSFF 
s3E 
#$00 
530 
#s03 
s31 


;TIMER SCHNELLER 
;KEIN KOPFTRANSPORT 
;PUFFER 0 ZUGRIFF 
KEINE SPURVERSTELLG 
;KEIN LAUFW.AKTIV 
;PUFFERADRESSE $0300 


ee STAPEL SPEICHERN ##### 


G 
. + 


TSX WICHTIG FUER RUECK- 
STX $49 SPRUNG AUS JOB 
LDA #sEE KOPF EINSCHALTEN 
STA $S1ICoc 

RIS 


RErTErT SYNCHRONISATION ##### 
u. 
LDA #sFF 
$1805 
$1805 


SYNC2 
$1C00 
SYNC1 
s1C01 


TIMER SETZEN 
;TIMER ABGELAUFEN 


»SYNC ABWARTEN 


»PORT LESEN 
#300 


SEC 
RTS ; FEHLER 


PETTEreT SPUR ERHOEHEN #####$ 
Ar ! 
LDX $1C00 


INX 
TXA 


»MOMENTANE SPUR 
»;BIT 0/1 VON $1C00 
UM 1 ERHOEHEN 
*s03 
saB 
$1C00 
*sFC 
s4B 
$1C00 
#890 
1805 
$1805 
PLMW 


»WIEDER SPEICHERN 
;WARTEZEIT IN TIMER 


} 


;WARTEN 


;##### SPUR ERNIEDRIGEN ##4## 
EN 

LDX $1C00 
DEX 

TRA 

AND #803 

JHP PLMI 


B 


;WIE ERHOEHEN 


96 QUW Sonderheft 2 
WEN MOMELDMPÜTERWORLD.LOM 


KOPF 


KOPFW 


KOPFK 


KOPFE 


BLCK 


BLOCKO 


BLOCK1 


WRITE 


WRITEF 


‚#### KOPF POSITIONIEREN #### 


STA $22 ;AUF SPUR IN A 
STA $18 
;MAL 2 
»PLUS VERSTELLUNG 


MACHT NEUE. SPUR 


sFr 
sFO 
srl 
sFo 
KOPFE 
KOPFK 
PLUS 
srl 
KOPFW 
MINUS 


;ALTE SPUR 
GLEICH 


;NEUE IST GROESSER 


BNE 
JSR 
DEC $Fl 

BNE KOPFW 


LDA«$FE 
ASL 


NEUE IST KLEINER 


;SPURBEREICH 
;ZUR BESTIMMUNG DER 
;LESEGESCHWINDIGKT. 


NACH BIT 5/6 
VON $1C00 


STA $1C00 
RTS 


@###64€ HEADER LESEN s4044#6 


LDA $12 ;IDi 
STA $16 

LDA $13 ;ID2 
STA 817 

LDA $FB TRACK 
STA $18 

LDA SFC ;SEKTOR 
STA $19 

EOR $16 

EOR $17 

EOR $18 

STA $SıA ;PRUEFSUMME BILDEN 
JSR $F934 ;VERSCHLUESSELN 
LDA #00 

STA $00 ;JOBMELDUNG LOESCHEN 
JSR STACKS ;STAPELPOSITION 
LDX #40 ;40 LESEVERSUCHE 
JSR $F538 »SYNC ABWARTEN 
LDA 0 

CHP #2 ;BEI FEHLER CARRY 
RTS 


i##### UPRG BLOCK LESEN ##### 


JSR STACKS sKOPF EIN 
JSR SYNC »;SYNC ABWARTEN 
BVC BLOCKO ;BYTE BEREIT 
CLV < 

LDA $1Co1 ;BYTE LESEN 
STA $0300,Y NACH $0300,Y 
INY a 

BNE BLOCKO 

LDY #5sBD 

BVC BLOCKI 

CLV 

LDA $1Co1 ;TEIL 2 
STA $0100,Y »NACH SO1BD,Y 
INY 

BNE BLOCK 

RTS 

‚#44 UPRG BLOCK SCHREIBEN ### 
= * 

LDA #sEE »KOPF AUF LESEN 
STA $1CocC 

LDX #809 »9 BYTES FREI 
LDY #500 

JSR $FDC9 ;X+256*Y BYTES READ 
LDA sıcoc 

AND #s1F 

ORA #5sC0 

STA $I1C0ocC ;AUF SCHREIBEN 
LDA #sFF 

STA $1C03 ;PORT AUF AUSGABE 
LDA #sFF ;SYNC MARKIERUNG 
STA $1C01 

LDX #505 5 SYNCS 
LDY #500 

sTY $F9 

JSR $FDC9 SCHREIBEN 


WRITEO 
WRITEL 


WRITE2 


WRITE3 


WRZ 
WRX 


SLAVE 


BEF1 


"BEF2 


BEF3 


BEF4 


BEFS 


BREAD 


BREADE 


#sBB 
80100,Y 
WRITEL 


s1C0l 
sF9 
sF9 


»VON #1BB,Y 
»;BYTE READY 


»;BYTE SCHREIBEN 
»;PRUEFSUMME 
WRITEO 


80300,Y 
WRITE3 


TEIL 2 


SCHREIBEN 


WARTEN BIS 
FERTIG MIT SCHREIBEN 


SEKTOR 
sF9 


$180,Y ;PRUEFS.IN TABELLE 
ze8## FLOPPY BEFEHLSAUSF. #### 


#500 

FIADR+2 

*5FA 

FLIN ;BEFEHL HOLEN 
;$FA = BEFEHL/RUECKMELDG 

= TRACK 

;$FC = SEKTOR 

= SEKTOREN / TRACK 
SPURBEREICH (3-0) 
VERSTELLFAKTOR (FF/01) 
sFA 
BREAD ;1=BLOCK LESEN 
BEF2 

BWRIT ;2=BLOCK SCHREIBEN 


BEF3 
BFORM ;3=SPUR FORMATIEREN 


BEF4 
BVERY ;4=SPUR VERIFYEN 
BEF5 
BINIT 
SEAAO 


;5=INITIALISIEREN 
; 
s#rreeeE BLOCK LESEN #aRrHHRE 


LDA SFB 
KOPF 
A 


»SPUR 

»KOPF POSITIONIEREN 
;HEADER LESEN 
»;FEHLER 

»;BLOCK LESEN 


«sol 


»TEIL2 


za0008 INITIALISIEREN ####### 


*2 
sF8 
#505 
#1C00 
*#sF0 
TIM 


;INITIALISIERVERSUCHE 
MOTOR AN 

WARTEN 

;KOPF BEWEGEN 
;INITIALISIERSPUR 
;LESEVERSUCHE 


;INIT.BEFEHL 
;AN CONTROLLER 


;AUSFUEHRUNG 


BINI3 


\ BINI2 
BINIl 


ASL 
STA 
JMP 


’ 


BINIO 
*s01l 
BINI1 
sF9 
BINIB 
sF8 
BINI2 
#sC0 
$00 
s00 
BINI3 
BINIA 
#255 
$FA 


;ABWARTEN 


FEHLERFREI 
»SONST NAECHST.VERS. 


;RATTERN 
;AN CONTROLLER 


;NAECHST. VERSUCH 


ZERO 
#$00 
FOADR+2 
#$FA 
FLOUT 
$22 


;RUECKMELDUNG 


sF1 
SLAVE 


»;SPUR ANGEBEN 


RErTT?) BLOCK SCHREIBEN #####% 


BWRIT 


BCS 
JSR 


JSR 
JMP 


’ 

LDA 
STA 
JMP 


BWRITX 


#$03 

FIADR+2 

#800 

FLIN ;SEKTOR HOLEN 
SF5E9 ;PRUEFSUMME BILDEN 
$3A 

$F8 

sF8 ; TRACK-PRUEFSUMME 
sF78F ;VERSCHLUESSELN 
HEAD ;HEADER LESEN 
BWRITX 

WRITE BLOCK SCHREIBEN 
s$FEOO PCR AUS 
SLAVE 

*sFF FEHLER MARKIEREN 
#200+150 

SLAVE 


’ 
swaneae SPUR PRUEFEN #####4#8 


BVERY 


BVERY& 


BVERYO 


Panasonic KX-P1080 


#10 
832 
HEAD 
BVERYI 
STACKS 
SYNC 
#543 
#s0l 
#800 
BVERYO 


»;START 2.HEADER 
;HEADER LESEN 


;SYNC ABWARTEN 
»256+43 BYTES 
;TESTEN 


#1C01 ;PRUEFSUMME 
BVERYO 
BVERYO 


sFC 


BVERY9 


BVERY2 
BVERYI1 


BFORM 


FORMO 


s180,Y MIT ALTER CHKSM 
BVERYI1 VERGLEICHEN 
sFC ;NAECHSTEN BLOCK 
SFC 

sFD ;SCHON LETZTER 
BVERY2 ‚ENDE 
SYNC 

#9 9 BYTES HEADER 
s32 

BVERY9I 

$200,Y VERGLEICH 
sıcol.. 

.BVERYI1 ;FEHLER 
BVERY9 

s32 

#SD0A »PLUS.10 
s32 

BVERYS ;NAECHSTER BLOCK 
*s00 

sFB ;0 = KEIN FEHLER 
sF8 

sFA ; TRACKPRUEFSUMME 
$1C00 WRITE PROTECT 
*s10 

sFC 

#500 

FOADR+2 

#sFA 

FLOUT »MELDUNG AN COMP. 
SLAVE 


»###4 SPUR FORMATIEREN #44### 


LDA 


#500 


$SF8 ;TRACKPRUEFS.LOESCHEN 
sFB 
KOPF :SPUR EINSTELLEN 


STACKS 


;8 HEADERANFANG 
;SEKTORNUMMER 

>; TRACKNUMMER 
‚IDENTITY 2 
IDENTITY 1 


;PRUEFSUMME 


50306,% 
s0307,Y 


;LEERRAUM 
*8 »;NAECHSTER HEADER 


sFCc 
sFC 
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FORMT 


FORMU 


FORHW 


FORMB 


JMP 
DOSEND .BYT 


Panasonic KX-P1080 
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$FD 
FORMO 
sFC 


sFE30 


sSFDES 
$FDF5 
#0 
$300,Y 
s200,Y 


;PUFFER KOPIEREN 


FORMT 
*l 
s300,% 


;LEERBLOCK ERZEUGEN 


FORMU 
#54B 
s300 
sF5E9 
$3A 
sF78F 
#500 
s32 


»;PRUEFSUMME 
;VERSCHLUESSELN 


s1Coc 
*sıF 
#sCo 
sıcoc 
«sFF 
+1C03 
#855 
s1Co1 
#504 
$FE24 


;AUF SCHREIBEN 
;PORT AUF AUSGABE 


;LEER 


#TRACK LOESCHEN 


*sFF 
s1col 
#805 
*#s00 
sFDC9 
*s0A 
832 
FORMB 


»+SYNC 


;SCHREIBEN 


s200,Y 


s1coı }HEADER SCHREIBEN 


FORMB 
#809 
*s00 
sFDC9 
WRITEF 
#504 
*s00 
sFDC9 
s32 


;LEERRAUM 


»BLOCK SCHREIBEN 


;LEERRAUM 


#S0A 
s32 
sFc 
FORMW 
$FEOO 
ZERO 
SLAVE 
sFF 


;NAECHSTER BLOCK 
;PCR LESEN 


nur 875,— 
nur 995,4 
nur 1295,— 
nur 120,— 


(für C64, C128, Apple Il) 

Gerne senden wir Ihnen unser Angebot mit Informations- 
material und Probeausdruck. Bitte Anwendungsgebiet an- 
geben. — Händleranfragen willkommen. 


T. WEBER ELEKTRONIK, 8700 WÜRZBURG 
Eisenbahnstraße 22, Tel. 09 31-70 14 41 


Free Soft (Public Domain Software) " 


für C 64 und PC 128 (CPIM) von verschiedenen US-Usergroups 


PC 128: 20 Disks voller Software je DM 12,—, alle 20 DM 200,— 
Liste gegen 0,80-Marken. 


Public Domain Software Kopierservice Christian Bellingrath, Trift 10, 5860 Iserlohn, Tel.: 0 23 71-2 41 92, Telex 827 937 


Werkzeugkasten 
für Programmbastler 


Fürs Programmieren gilt dasselbe 
wie für andere kreative Tätigkei- 
ten: Nötig sind 10 Prozent Inspira- 
tion und 90 Prozent Transpiration. 
Ein günstigeres Verhältnis erzielt 
man mit den LAUBTOOLS. Sie 
stellen dem Programmierer einen 
Werkzeugkasten voller nützlicher 
Hilfsfunktionen zur Verfügung. Ba- 
sic- und Maschinenprogramme 
lassen sich mit dem Komfort eines 
Textverarbeitungssystems erstel- 
len. Die Floppy wird mit wenigen 
Tastendrücken gebändigt. Test- 
befehle helfen beim Aufspüren 
von Programmfehlern. Das fertige 
Endprodukt kann schließlich auto- 
matisch dokumentiert und kompri- 
miert werden. 


Drei Betriebsarten für 


Basic und Assembler 
VERSENDET se 


Die LAUBTOOLS unterstützen nur 
das eingebaute Basic V2.0 und 
‚sind zu anderen Erweiterungen 
nicht kompatibel. 

Für die Beschreibung der Befehle 
gilt: Die in Q angegebenen Para- 
meter können bei der Eingabe 
‘weggelassen werden. In diesem 
Fall werden voreingestellte Wer- 
te (Defaultwerte) wirksam. Wer- 
den in der Befehlszeile “," (Kom- 
ma) aufgeführt, so müssen sie an 
der angegebenen Stelle eingege- 
“ ben werden. Bei manchen Befeh- 
len werden bei der Eingabe keine 
Leerzeichen akzeptiert. Ein 
"SYNTAX ERROR" macht darauf 
aufmerksam. 

Das Programm stellt folgende Be- 
fehle zur Verfügung: 

a) Befehle zum Einstellen der Be- 
triebsart 

BASIC: Schaltet die normale Ba- 
 sic-Betriebsart ein. Dieser Modus 
ist nach dem Programmstart aktiv. 
Statt "READY." erscheint die Mel- 
dung "BASIC.“. Außerdem sind 
die zusätzlichen LAUBTOOLS-Be- 
fehle wirksam. 
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Programmieren bringt 
viel Handarbeit mit 
sich — suchen und er- 


umnumerieren 


setzen, 


und verschieben. Die 
LAUBTOOLS ersparen 


die Plackerei. 


SRC: Schaltet die Betriebsart 
SOURCE ein. Alle Befehlszeilen 
werden als reine ASCII-Zeichen- 
folgen in den Speicher übernom- 
men, einschließlich der Groß-/ 
Kleinschreibung. Führende Leer- 
zeichen werden nicht 
drückt. In dieser Betriebsart kann 


‚man formatierte Assemblerquell- 


programme oder sonstige Texte 
eingeben. Basic-Schlüsselwörter 
werden nicht erkannt, es Können 
also keine Basic-Programme er- 
stellt werden. 


Keine Zeilennummern 
a RER 


TEXT: Schaltet den Textausgabe- 
modus ein. In dieser Betriebsart 
werden nach Eingabe von LIST 
keine Zeilennummern ausgege- 
ben. Es gibt keine -Bereitschafts- 
meldung wie "READY."/"BA- 
SIC."/"SOURCE."., Die Eingabe- 
bereitschaft erkennt man nur noch 
am blinkenden Cursor. Durch die- 
sen Befehl wird der Bild- 
schirmeditor zu einem einfachen 
Textverarbeitungssystem. Er eig- 
net sich besonders zur Darstel- 
lung von Texten, die in der SOUR- 
CE-Betriebsart erstellt worden 
sind. 

X: Schaltet auf das Originalbe- 
triebssystem zurück. Dies ist dann 
erforderlich, wenn man andere 
Maschinenprogramme an einen 
durch die LAUBTOOLS belegten 
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unter- 


Speicherplatz bringen will. Sofern. 
.die LAUBTOOLS nicht 


über- 
schrieben wurden, können sie 
durch Eingabe von POKE 1,53 
wieder aktiviert werden. 

b) Edit-Befehle 


DEL (Bereich): Löscht die in den. 


angegebenen Bereich fallenden 
Zeilennummern aus dem Pro- 
gramm. Die Eingabe von DEL 
ohne Angabe eines Bereiches 
wirkt wie NEW. Mit DEL (Bereich) 
gelöschte Zeilennummern können 
mit OLD nicht wieder. zurückge- 
holt werden. Bereich: Hier wird 
die erste und die letzte Zeilennum- 
mer des gewünschten Bereichs 
angegeben. Folgende Darstellun- 
gen sind möglich: 

120—180: alle Zeilen zwischen 120 
und 180 inklusive 

1500—: Zeile 1500 inklusive bis 
Programmende 

—3000: erste Zeile bis Zeile 3000 
inklusive 

12 000: nur diese eine Zeile 

keine Angabe = Default: alle Zei- 
len 

OLD: Bringt ein mit DEL, NEW 
oder Reset gelöschtes Programm 
wieder in den Speicher zurück. 
Allerdings darf nach dem Lö- 
schen keine weitere Befehlszeile 
eingegeben worden sein. 
RENUM (Bereich) (‚neuer An- 
fang) (‚Schrittweite)) 

MOVE (Bereich) (‚(neuer Anfang) 
(‚Schrittweite)) 

COPY (Bereich) (‚(neuer we) 
(‚Schrittweite)) 


Diese Befehle numerieren er un- 


ter Bereich angegebenen Zeilen- 
nummern so um, daß sie ab der 
unter neuer Anfang angegebenen 
Zeilennummer mit der gewünsch- 
ten Schrittweite neu in das Pro- 
gramm eingebunden werden. Da- 
bei kann mit RENUM die Pro- 
grammstruktur, also die Reihen- 
folge der Programmzeilen, nicht 
geändert werden. Mit MOVE und 
COPY ist es möglich, einzelne Zei- 
len oder ganze Bereiche an ande- 


re Stellen im Programm zu beför- 


dern. Einzige Bedingung: Ab der 


‘de Zeilennummer 


neuen Zeilennummer (neuer An- 
fang) muß bis zur nächsten bereits 
existierenden Zeilennummer so- 
viel Platz sein, daß alle Befehle 
des angegebenen Bereichs mit 
der kleinstmöglichen Schritt- 
weite (=1) hineinpassen. Wird 
eine größere Schrittweite angege- 
ben, so versucht die Routine zu- 
nächst, durch fortlaufende Halbie- 
rung der Schrittweite die neuen 
Zeilen einzufügen (Anzeige: "ST/ 
2"). Führt auch das nicht zum Er- 
folg, wird die Meldung "NEIN!" 
ausgegeben; die ursprünglichen 
Zeilennummern bleiben unverän- 
dert erhalten. Bei MOVE werden 
die ursprünglichen Zeilennum- 
mern gelöscht, bei COPY jedoch 


nicht. 


Sprungbefehle 


angepaßt 


Alle Sprungbefehle wie GOTO, 
GO TO, GOSUB, IF..THEN, ON 
.GOTO, ON..GOSUB, RUN.. wer- 
den in der Betriebsart BASIC auto- 
matisch der neuen Programm- 
struktur angepaßt, außer bei 
COPY. Ist in einem Befehl das an- 
gegebene Sprungziel nicht vor- 
handen, so wird die falsche Zei- 
lennummer durch die Zeichenfol- 
ge "XXXXX" ersetzt. 
Defaultwerte: Bereich: alles 
neuer Anfang: 10 

Schrittweite: 10 

LINE (Erste Zeilennummer) 
(‚Schrittweite): Automatisches Ge- 
nerieren und Anzeigen der je- 
weils nächsten Zeilennummer zur 
vereinfachten Programmeingabe. 
Dabei kann die erste zu erzeugen- 
sowie die 
Schrittweite angegeben werden. 
Wird eine Zeilennummer gene- 
riert, die bereits existiert, so wird 
als Warnung vor der Zeilennum- 
mer ein "!" ausgegeben. In die- 
sem Fall überschreibt ein neu ein- 
gegebener Befehl den alten; 
durch die Eingabe eines “!" bleibt 
der alte Zeileninhalt unverändert 
erhalten, und es wird die nächste 
Zeilennummer erzeugt. Durch 
Drücken von RETURN unmittelbar 
nach der Zeilennummer wird die- 
ser Modus verlassen. Defaultwer- 


10, 


Erste Zeilennummer: 
Schrittweite: 10. 


te: 


FIND (Bereich)/string/(Anzah)): 
Sucht im angegebenen Bereich 
die aufgeführte Zeichenfolge (AS- 
CIlString oder Basic-Befehl) und 
listet die betroffene Zeile auf. Da- 
bei kann die gewünschte Anzahl 
der aufzulistenden Zeilen angege- 
ben werden. Bereich: Wie bei 
LIST. Die gesuchte Zeichenfolge 
muß durch ein selbstgewähltes 
Begrenzungszeichen eingegrenzt 
sein. Beispiele: 

/PRINT/*Al=* 

"PRINT" 

FREMF 

Jeweils das erste Zeichen wird als 
Begrenzung interpretiert und als 
Abschluß der Zeichenfolge er- 
wartet. 

Als Anzahl ist jede Zahl zwischen 0 
und 63 999 zugelassen. Ohne An- 
gabe wird sie auf den Maximal- 
wert gesetzt und alle Fundstellen 
werden aufgelistet. 

Hinweis: In der Betriebsart BASIC 
werden alle eingegebenen Basic- 
Schlüsselwörter erkannt und in 
die internen Codes (= Tokens) 
übersetzt, es sei denn, ' sie sind 
durch Einschließen in Anfüh- 
rungszeichen als String gekenn- 
zeichnet. In diesem Fall ist es auch 
möglich, ASCII-Zeichenfolgen von 


-Basic-Schlüsselwörtern zu finden. 


Zu beachten ist, daß auch einstelli- 
ge Basic-Schlüsselwörter bei Ein- 
satz als Delimiter in Tokens ge- 
wandelt werden (zum Beispiel 
?,<,>,*,/,+,—)! Daher wird ein 
Befehl FIND/REM/ einen ?SYN- 


TAX ERROR ergeben, da der 


zweite Delimiter nicht erkannt 
wird: Das erste / wird in ein Token 
gewandelt, nicht jedoch das zwei- 
te /, da es nach einem REM steht. 


Eine weitere Schwierigkeit ist, 


daß PRINT und PRINT# unter- 
schiedliche Tokens haben. 

In der Betriebsart SOURCE wird 
immer nur nach den eingegebe- 
nen ASCII-Zeichenfolgen gesucht, 
da hierbäi keine Basic-Tokens ge- 
neriert werden. 

CHANGE (Bereich)/altstring/neu- 
string/(Anzahl): Ersetzt im ange- 
gebenen Bereich die alte Zeichen- 
folge altstring durch eine neue 
Zeichenfolge neustring. Dabei 
kann die gewünschte Anzahl der 
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zu ändernden Zeichenfolgen an- 
gegeben werden. Bereich: Wie 
bei LIST. Jede der angegebenen 
Zeichenfolgen altstring und neu- 
string muß durch einen selbstge- 
wählten Delimiter eingegrenzt 
werden. Dabei können die Delimi- 
ter für jede Zeichenfolge unter- 
schiedlich sein. Beispiel: 
CHANGE/PRINT/*PRINT #4,* 
Jeweils das erste Zeichen wird als 
Delimiter interpretiert und als Ab- 
schluß der jeweiligen Zeichenfol- 
ge erwartet. Die Länge der Zei- 
chenfolgen unterliegt nur der Be- 
schränkung der Gesamtbefehls- 
länge auf 80 Zeichen. 

Als Anzahl ist jede Zahl zwischen 0 
und 63 999 zugelassen. Ohne An- 
gabe wird sie auf den Maximal- 
wert gesetzt, alle gefundenen Zei- 
chenfolgen werden geändert. 
Zeilennummern können mit 
CHANGE nicht geändert werden, 
dafür steht der Befehl RENUM zur 
Verfügung. 


- Besonderheiten: CHANGE/alt/// 


führt zum Löschen der alten Zei- 
chenfoige. Bleibt dadurch in der 
betroffenen Zeile kein Zeichen 
mehr übrig, verbleibt diese Zei- 
lennummer ohne Inhalt im Pro- 
gramm. Dadurch wird vermieden, 
daß unbeabsichtigt ein Sprungziel 
gelöscht wird. Eine solche „leere“ 
Zeilennummer kann man wie eine 
normale Befehlszeile löschen oder 
überschreiben. 

CHANGE///neu/ ist sinnlos und 
führt zu einem "?SYNTAX ERROR" 


Programme 


komprimiert 
ee 


KOMP: Komprimiert das im Spei- 
cher stehende Programm auf die 
kürzestmögliche Form. REMs wer- 
den dabei nicht entfernt. Sie las- 
sen sich durch den Befehl KILL 
beseitigen (siehe unten). Obwohl 
der C64 genügend Speicherplatz 
für fast alle Anwendungen zur 
Verfügung stellt, ist der Befehl oft 
nützlich, um den externen Spei- 
cherplatzbedarf und die Ladezei- 
ten zu verringern. Darüber hinaus 
werden komprimierte Programme 
schneller. 
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2 / 

Man sollte stets eine Kopie des 
Originalprogramms aufbewahren, 
da der dokumentarische Wert ei- 
nes mit KOMP behandelten Pro- 
gramms gegen Null geht. Außer- 
dem ist. das Editieren dieses Pro- 
gramms so gut wie unmöglich, da 
eine Basic-Befehlszeile bis zu zehn 
Bildschirmzeilen umfassen kann. 
KOMP darf nur auf Basic-Pro- 
gramme angewendet werden! 
KILL (Bereich): Entfernt alle REM- 
Einfügungen aus dem angegebe- 
nen Bereich des im Speicher ste- 
henden Programms. Zusammen 
mit dem KOMP-Befehl läßt sich 
damit viel Speicherplatz einspa- 
ren. 

MERGE (‘Name" (‚Gerätenum- 
mer)): Mischt Befehlszeilen von ei- 
nem externen Datenträger (Dis- 
kette oder Kassette) zu einem Pro- 
‘gramm im Speicher. Die neu hin- 
zukommenden Zeilennummern 
werden wie bei der Eingabe über 
die Tastatur an der entsprechenden 
Stelle einsortiert. Bei bereits vor- 
handenen Nummern wird die alte 
Befehlszeile durch die neu hinzu- 
kommende überschrieben. Die- 
ser Befehl ist besonders wirkungs- 
voll zum Einmischen von häufig 
benötigten Unterprogrammen 
oder Programmköpfen (siehe 
auch Befehl PUT). Abkürzung für 
Diskettenbetrieb: Siehe Befehl &. 


Zeilenbereich saven 
Ban a ap ee 


PUT (Bereich) ("Name" (‚Geräte- 
nummer)): Legt die Befehlszeilen 
aus dem angegebenen Pro- 
grammbereich auf Kassette oder 
Diskette ab. Der abgespeicherte 
Programmteil kann mit MERGE 
oder LOAD wie ein normales Ba- 
sic-Programm geladen werden. 
Bereich: Wie bei LIST. Die übrige 
Syntax entspricht dem Basic-Be- 
fehl SAVE. 

CHK (Bereich) ("Name (‚Geräte- 
nummer)): Vergleicht die in dem 
angegebenen Bereich stehenden 
Programmzeilen mit dem Inhalt 
des unter "Name" abgespeicher- 
ten Programms. Stimmen alle Zei- 
len des angegebenen Bereichs 
mit dem Inhalt des gespeicherten 
Programms bis dahin überein, 


wird die Meldung "OK" ausgege- 
ben. Weitere gespeicherte Pro- 
grammzeilen werden nicht mehr 
überprüft. Bei der ersten festge- 
stellten Abweichung wird die Mel- 
dung “VERIFY ERROR IN LINE 
XXX" ausgegeben und der Ver- 
gleichsvorgang abgebrochen. Bei 
Kassettenbetrieb bleibt die Kas- 
sette also nicht unbedingt am 
Ende des abgespeicherten Pro- 
gramms stehen. Um dies zu errei- 
chen, muß der Befehl VERIFY be- 
nutzt werden. 

c) Diskettenbefehle 

$ (Gerätenummer): Liest das In- 
haltsverzeichnis des angegebe- 
nen Laufwerks aus und zeigt es 
auf dem Bildschirm an. Ein im 
Speicher befindliches Programm 
wird dabei nicht gelöscht. Geräte- 
nummer: 8 bis 11, Default=8. 


Directory einlesen 
ERRSEETERTEN 


$ (Gerätenummer) (‚) Name: Lädt 
ein Programm vom angegebenen 
Laufwerk in den Speicher. Gerä- 
tenummer: 8bis 11, Default=8. 
Das Komma ist nur erforderlich, 
wenn der Programmname mit ei- 
ner Ziffer beginnt. 

/ (Gerätenummer) (‚) Name: Lädt 
ein Programm vom angegebenen 
Laufwerk in den Speicher. Wird 
kein Name angegeben, so zeigt 
der Befehl das Directory ohne 
Programmverlust. Der Befehl ist 
dann identisch mit dem Befehl $. 
Mit /$ kann man auch das Direc- 
tory in den Speicher laden. Gerä- 
tenummer: 8 bis 11. Default=8. 
Das Komma ist nur erforderlich, 
wenn der Programmname mit ei- 
ner Ziffer beginnt. 

% (Gerätenummer) (,) Name: Lädt 
ein Programm vom angegebenen 
Laufwerk als Maschinenpro- 
gramm (absolut) in den Speicher. 
Gerätenummer: 8 bis 11, De- 
fault=8. 

Das Komma ist nur erförderlich, 
wenn der Programmname mit ei- 
ner Ziffer beginnt. 
@(Gerätenummer): Liest den Feh- 
lerkanal des angegebenen Lauf- 
werks aus und zeigt die Meldung 
am Bildschirm an. Gerätenummer: 
8 bis 11, Default=8. 
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@(Gerätenummer) Floppy-Befehl: 
Überträgt einen Befehl an das an- 
gegebene Laufwerk. Gerätenum- 
mer: 8 bis 11, Default=8. 

<-(Gerätenummer) (‚Bereich) (j) 
Name: Speichert das Programm 
oder den Programmbereich auf 


‘dem angegebenen Laufwerk ab. 


Gerätenummer: 8 bis 11, De- 
fault=8,. 

Bereich: Wie bei LIST. Wenn ein 
Bereich angegeben wird, muß er 
durch Komma von der Geräte- 
nummer abgetrennt sein. Das 
Komma vor dem Namen ist nur er- 
forderlich, wenn der Programm- 
name mit einer Ziffer beginnt. 

! (Gerätenummer) (‚Bereich) (‚) 


Name: Kurzform des CHK-Befehls. 


Zu beachten ist die geänderte | 


Syntax. Wenn ein Bereich ange- 
geben wird, muß er durch ein 
Komma von der Gerätenummer 
abgetrennt sein. Das Komma vor 
dem Namen ist nur erforderlich, 
wenn der Programmname mit ei- 
ner Ziffer beginnt. 

& (Gerätenummer) (,) Name: Kurz- 
form für den MERGE-Befehl. Zu 
beachten ist die geänderte Syn- 
tax. Das Komma ist nur erforder- 
lich, wenn der Programmname mit 
einer Ziffer beginnt. 


Gerätenummer ändern 
Be re a 


"#(alte Gerätenummer) (‚(neue 


Gerätenummer)); Ändert soft- 
waremäßig die Nummer des an- 
gegebenen Laufwerks (alte Gerä- 
tenummer) in die neue Geräte- 
nummer um. Dabei darf nur das 
Laufwerk eingeschaltet sein, des- 
sen Gerätenummer geändert wer- 
den soll: Es muß auf die alte Gerä- 
tenummer eingestellt sein. 

Alte Gerätenummer 8 bis 11. De- 
fault:9 

’” vor dem Diskettenbefehl @ 
(Apostroph): Zeigt an, daß der fol- 
gende Diskettenbefehl im String- 
format eingegeben ist. Disketten- 
befehle ohne vorangestelltes """ 
werden als ASCII-Zeichenfolge in- 
terpretiert und sind daher ohne 
Anführungszeichen einzugeben. 
Mit ihnen können jedoch nur die 
sichtbaren ASCII-Zeichen an die 
Floppy übertragen werden. Sol- 


len Byte-Inhalte übergeben wer- 
den, für die es keine druckbaren 
Zeichen gibt, so muß dies in Form 
eines Strings gemacht werden. 
Nach einem vorangestellten “'" 
sind alle Basic-Stringoperatoren 
zugelassen. Beispiele: 

"@"M-W" 4+.CHR$(119)+ CHR$(0) 

+ CHR$(64)+ "AV" 

'/"NAME"+A$ 

'@9"S:TEST* PROG#" 

+ (Gerätenummer): Macht den 
Spurwechsel der Floppy schnel- 
ler. 

— (Gerätenummer): Hebt den Be- 
fehl "+" wieder auf. 

a) Testhilfen 

TRACE: Schaltet den Tracemo- 
dus ein. Während des Programm- 
ablaufes wird die Nummer der ge- 
rade abgearbeiteten Zeile auf 
dem Bildschirm angezeigt. Durch 
Drücken der Taste CTRL kann 
der Programmablauf auf ungefähr 
2 Befehle pro Sekunde verlang- 
samt werden. Durch Drücken der 
Taste C= wird in den Einzel- 
schrittmodus geschaltet: Hierbei 
wird der jeweils nächste Befehl 
erst nach Drücken einer beliebi- 
gen Taste abgearbeitet. Nochma- 
liges Drücken der Taste C= hebt 
diesen Modus wieder auf. 

Durch Eingabe des Befehls 
"TRACEH" wird gleich zu Beginn in 
den Einzelschrittmodus geschaltet. 
Die Farbe des Bildschirmfensters 
kann mit der Taste "=" geändert 
werden. Dazu wird diese Taste so- 
lange gedrückt, bis die ge- 
wünschte Farbkombination er- 
reicht ist. 


Einzelschrittmodus 


Eine Sonderfunktion hat die Taste 
SHIFT: Im  Einzelschrittmodus 
wird das Programm normal abge- 
arbeitet, solange die Taste ge- 
drückt ist. Im Normalmodus wird 
das Programm bei gedrückter Ta- 
ste angehalten und erst beim Los- 
lassen fortgesetzt. 

Weitere Befehle im Trace-Modus: 
RETRACE: Zeigt das letzte Bild- 
schirmfenster nochmals an. 
CLEAR: löscht den Inhalt des 
Bildschirmfensters. 

UNTRACE: Schaltet den TRACE- 
Modus ab. 


Die beiden Befehle TRACE und 
UNTRACE können im SLOW-Mo- 
dus (siehe unten) auch als normale 
Befehle in ein Programm einge- 
fügt werden. So können kritische 
Programmteile getraced werden. 
Es werden dann nur die nach ei- 
nem TRACE- und vor einem UN- 
TRACE-Befehl stehenden Zeilen- 
nummern beim Lauf des Pro- 
gramms angezeigt. 


SLOW: Nach Eingabe dieses Be- 


fehls werden alle LAUBTOOLS- 
Befehle auch in einem Basic-Pro- 
gramm erkannt und ausgeführt. 
Zu beachten ist, daß die meisten 
neuen Befehle nach Ausführung in 
den READY-Modus springen. Im 
SLOW-Modus ist der Ablauf von 
Programmen um etwa 40 Prozent 
verlangsamt. 

FAST: Hebt den SLOW-Modus 
wieder auf. Dies ist der Normalzu- 
stand der LAUBTOOLS nach dem 
Laden. Basic-Programme werden 
dabei nur um etwa 0,2 Prozent ver- 
langsamt. Die LAUBTOOLS-Be- 
fehle werden nicht erkannt, wenn 
sie in einem Programm vorkom- 
men. 

LAST: Zeigt die zuletzt ausgege- 
bene Fehlermeldung mit der zu- 
gehörigen Zeilennummer an. Da- 
mit können beispielsweise im Hi- 
res-Modus aufgetretene Fehler 
nach Drücken von RUNSTOP/RE- 
STORE sichtbar gemacht werden. 
DUMP: (Variablenbereich) 
(‚1LN,#,%,$): Zeigt den aktuellen 
Inhalt der belegten Variablen auf 
dem Bildschirm an. 

Die Anzeige erfolgt in der Reihen- 
folge: 

l. Nicht indizierte Variablen 

2. Indizierte Variablen (Arrays) 
jeweils sortiert nach 

a. Fließkomma-Variablen (Var) 

b. Integer-Variablen (Var%) 

c. String-Variablen (Var$) 

Die Ausgabe wird nach jedem ge- 
füllten Bildschirm angehalten und 
erst nach Drücken einer beliebi- 
gen Taste fortgesetzt. Variablen, 
deren Inhalt Null oder ein Leer- 
string ist, werden nicht angezeigt. 
Durch Angabe eines Variablen- 
bereichs kann der Umfang der 
ausgegebenen Variablen einge- 
grenzt werden: Es werden nur die 
Variablen ausgegeben, deren Na- 
men alphabetisch sortiert (Ziffer 
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vor Buchstabe) innerhalb der an- 
gegebenen Grenzen liegen. Wei- 
tere Einschränkungen der ausge- 
gebenen Variablen sind möglich 
durch die Angabe der gewünsch- 
ten Variablenart. Dabei bedeu- 
ten: 

I: Nur indizierte Variablen 

N: Nur nichtindizierte Variablen 
#: Fließkomma-Variablen 

%: Integer-Variablen 

$: String-Variablen 

Vor weiteren Einschränkungen 
muß der Zusatz Ioder N immer als 
erstes eingegeben werden, erst 
danach darf eine beliebige Kom- 
bination der übrigen Zusätze #, 
%, $ folgen. 

Die Angabe der Variablenart muß 
immer durch ein Komma vom Va- 
riablenbereich abgetrennt sein. 
Bei den weiteren Einschränkun- 
gen der Variablenart können die 
trennenden Kommas weggelas- 
sen werden. 

Nach einer Programmänderung 
werden alle Variablen gelöscht 
und können deshalb durch DUMP 
nicht mehr angezeigt werden. 


Cross-Reference und. 


formatiertes Listing 


DOKU (Bereich) (P,V,S.U): Über- ° 


sichtliches Auflisten und Doku- 
mentieren von Basic-Program- 
men. Folgende Leistungen stehen 
zur Verfügung: 

P: übersichtliches 
listing 

V: Tabelle der im Programm ver- 
wendeten Variablen und deren 
Fundorte (Zeilennummern) 

S: Tabelle der Sprungadressen 
(GOTO) 

U: Tabelle der verwendeten Un- 
terprogramme (GOSUB-RETURN) 
Ein "?" bei einer Zeileneingabe 
zeigt an, daß die betreffende Zeile 
im Programm nicht auffindbar ist. 

Durch Angabe eines Programm- 
bereichs werden Listing und/ 
oder Tabellen nur für einen Teil 
des Programms angefertigt. Wei- 
tere Optionen werden im Dialog 
mit dem Anwender abgefragt: 

— Die Ausgabe erfolgt wahlweise 
auf den Bildschirm oder auf den 
Drucker. 
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— Die Länge der ausgegebenen 
Zeilen kann zwischen 20 und 80 
Zeichen gewählt werden. 

— Es besteht die Möglichkeit, die 
programmierten Cursorbewegun- 
gen nicht als reverse Steuerzei- 
chen, sondern als Klartext aus- 
"drucken zu lassen. 

Die LAUBTOOLS sind ganz in Ma- 
schinensprache geschrieben. 
Nach dem Start mit RUN werden 


$8000 bis $9EF5 verschoben. 
Außerdem werden beide ROM- 
Bereiche ins RAM kopiert und 
dort verändert. 

Das Programm ist als kombinier- 
ter Hexdump-Basiclader abge- 
druckt. Wie man mit dieser Art 
von Listing umgeht, steht auf Seite 
6. Wird das Programm als Basicla- 
der eingegeben, so muß der La- 
der vor dem Start mit RUN unbe- 


sie in den Speicherbereich von dingt abgespeichert werden. 


16,08,C2,07,9E,20,32,30, 
37,32,3A,4C,41,55,42,54, 
YF,4F,4C,53,00,00,00,r2, 
36,A0,08,BD,7F,08,39,58, 
00,CR,C0,07,D00,02,n0,04, 
88,10,F0,8n,48,20,BF,n3, 
68,AA,DO,E5,8E,05,A8,8E, 
9n,FD,8E,76,E4,8E,79,E4, 
BE,D8,E4,8E,09,E4,A9,80, 
85,38,8D,A1,A4,8D,38,R4, 
BD, 06,A8,8D,30,E3,R9,SC, 
8D,AD,A4,8BD,97,A4,A9,46, 
8D0,8F,E3,R9,1B,8D;D7,E4, 
A9,03,8D,43,A5,A9,08,8D, 
7A,E4,A9,35,85,01,8D,D6, 
FD,20,44,A6,4C,74,A4,F5, 
9E,25,29,30,0R,5D,E4,85, 
09, BC,08,7E,A3,BC,08,B6, 
08,38,FD,30,0A,E8,09,AC, 
E4,E8,09,BD,09,D7,E4,ED, 
093,90,09,6B,BF,3D,09,85, 
09,00,00,00,00,00,E0,00, 
C0,00,C0,00,RB0,42,41,53, 
49,43,2E,AD,8B8,02,85,FC, 
AO,22,84,FB,R9,08,85,FE, 
84, FD,A2,00,8E,39,E4, AO, 
05,AE,46,E4,B9,33,E4,31, 
FB,8R,91,FD,88,10,F5,AD, 
39,E4,0R,AB,B9,3R,E4, AR, 
B9,3B,E4,C3,FF,F9,1D,20, 
53,E4,20,DF,BD,20,87,B4, 
P®,A6,B6E,AA,EG,FB,RD,00, 
B1,22,09,80,31,FB,C8,Ca, 
DO,F6,C6,FB,A9,28,48,18, 
65,FB,85,FB,30,02,E6,FC, 
68,18,65,FD,85,FD,30,02, 
E6,FE,AE,39,E4,E8,E0,06, 
DB,A2,60,n2,00,BD,3C,E4, 
SD,3A,E4,E8,E®,0A,DO,FS, 
690,20,1B,E4,20,34,E3,4C, 
AE,A7,AS,FF,ARO,0B,39, 34, 
E4,88,10,FA,60,A9,RE,nD, 
A7 ‚8D,EB,A7,8C,EC,R7,4C, 
AE,A7,A3,AB,AD,Ad,RD,AD, 
00,00,00,00,00,00,00,00, 
00,20,00,00,00,00,00,AD, 
6B,E4,0A,AB,B1,3D,AA,CB, 
B1,3D,85,62,86,63,n2,30, 
38,4C,49,BC,AD,7B,E4,85, 
7A,AD,7C,E4,85,7B,60,rD, 
7D,E4,AE,7E,E4,18,69,01, 
99,01,E8,560,0D,0D,44,52, 
55,43,4B,45,52,3F,20,4E, 
9D,00,0D,47,45,52,2E,2D, 
41,44,52,45,53,53,45,3F, 
20,34,30,00,18,65,7R,8S, 
7A,AS,7B,69,00,85,7B,60, 
50,56,53,55,#4,17,AB,#9, 
AF,B®,CB,0D,5A,45,43,4C, 
45 ‚4E,40,41,45,4E,47,45, 
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Nach dem Einpoken der Daten 
kann das fertige Maschinenpro- 
gramm mit 

POKE 43, 1:POKE 44,8 

POKE 45, 37:POKE 46,41 

SAVE "NAME',8 

auf Diskette abgespeichert wer- 


“ den. Werden die LAUBTOOLS als 


Hexdump eingegeben, so muß 
der Checker benutzt werden. Als 
Startadresse ist 0801 anzugeben. 

(fürgen Laub) EcsEEEE 


3F ,20,33,39,3D,30,00,#5, 
5F,85,7A,A5,60,85,7B,602, 
AS,FB,85,7A,AS,FC,85,7B, 
60,45,2D,85,FB,AS,2E,85, 
FC,60,A5,7A,85,FB,n5,7B, 
85,FC,60,R5,7A,85,FD,RS, 
7B,85,FE,60,45,5F,85,FB, 
A5,560,85,FC,60,A5,5F,85, 
FD,AS,60,85,FE,60,#5,2B, 
85,7A,n5,2C,85,7B,60,#6, 
3A,E8,00,3B,h2,00,R0,FF, 
20,6B,FD,20,79,00,C8,38, 
F9,CB,80,00,05,20,73,00, 
DO,F4,C9,80,D0,0E,8A,0A, 
A8,B9,4B,81,48,B9,4A,81, 
48,46,73,00,20,59,FD,88, 
C8,B9,CB,80,10,FA,E8,B9, 
CC,80,F0,03,4C,0C,80,20, 
79,00,4C,A5,A9,E®,1F,30, 
02,A2,1E,8E,D7,E4,A5,39, 
8D,D8,E4,AS,3A,80,09,E4, 
4C,3R,A4,AE,76,E4,D0,27, 
AE,00,02,E0,5F,F0,40,EO, 
40,F0,3C,E0,43,F0,29,E0, 
46,F0,25,E0,41,B0,15,E0, 
27,F0,11,E0,3F,F0,0D,EO, 
20,F9,24,E0,30,90,20,RE, 
9A,FD,D0,04,A2,37,86,01, 
20,7C,#5,R2,35,86,01,690, 
A2,01,BD,00,02,C3,49,F0, 
E6,C9,48,F0,E2,D0,ES,AD, 
SA,FD,D®,E4,20,AC,82,20, 
7C,A5,20,E6,82,4C,34,80, 
53,4F,55,52,43,45,42,41, 
53,49,43,2E,AD,AO,RO,nD, 
AD,AB,A4,AF,CO,AB,A1,A7, 
AS,A3,DF,AB,AD,4F,4C,C4, 
4D,45,52,47,C05,44,45,CC, 
46,49,4E,C4,43,48,41,4E, 
47,C5,52,45,4E,55,C0,54, 
45 ,58,D4,53,52,03,42,41, 
53,49,C3,4C,49,4E,C5,4D, 
yF,56,C5,43,4F,50,D9,4B, 
49 ,4C,CC,4B,4F,4D,D0,50, 
55 ,D4,43,48,CB,4C,41,53, 
D4 ‚44 ,4F ,4B,D5,54,52,41, 
43,6C5,55,4E,54,52,41,43, 
C5,52,45,54,52,41,43,C5, 
43,4C,45,41,D2,44,55,4D, 
DO,53,4C,4F,D7,46,41,53, 
D4,DB,2D,FF,2A,FF,2B,FF, 


990,1C,8B,36,8B,R5,8B,20, 
8C,E2,8B,BC,8C,34,8C,3E, 
8C,FD,8B,C1,8B,C4,8B,DE, 
88,95,83,3E,83,EC,83,EF, 
83,58,85,71,82,74,82,BB, 
82,F5,82,55,85,52,85,24, 
BE ,14,BF,00,8A,FD,89,61, 
82,FB,30,54,30,25,E4,14, 


E4,11,E4,F2,39,36,30,44, 
90,5C,82,36,88,C1,8B,C4, 
8B,20,60,A6,4C,74,A4,20, 
6B,A9,20,13,A6,45,14,8D, 
7F,E4,A5,15,8D,80,E4,20, 
79,00,F0,37,C9,2C,F0,33, 
C9,2D,F®,04,C3,AB,DO,2B, 
20,73,00,8B0,20,20,6B,A9, 
AB,14,AS,15,8D,7E,E4,BE, 
7D,E4,CD,80,E4,90,0B,D0, 
06,8R,CD,7F,E4,30,03,4C, 
79,00,4C,48,B2,A2,FF,ag, 
F9,D8,E1,A5,14,05,15,F®, 
FY,D9,D5,A0,00,B1,7A,8D, 
7B,E4,C8,Bl,7A,F®,OF,BD, 
7C,E4,C8,B1,7A,85,39,C8, 
B1,7A,85,3A,18,60,38,60, 
AS,3A,CD,7E,E4,D0,07,#5, 
39,CD,7D,E4,FO,EE,60,r0, 
00,B1,FD,91,FB,E6,FB,DO, 
02,E6,FC,E6,FD,D9,02,E8&, 
FE,AS,FE,CS,2E,30,ER,D®, 
E8,AS,FD,C5,2D,30,Ee,#s, 
FB,85,2D,AS,FC,85,2E,4C, 
33,45,85,14,86,15,4C,13, 
AB,20,6B,A9,nS,14,AA,Au, 
15,05,15,60,49,37,85,01, 
6Q,AE,D7,E4,AD,D8,E4,85, 
39,AD,D9,E4,85,3A,4C,3A, 
A4,A2,2C,2C,R2,20,BE,En, 
A6B,A2,00,BE,EE,R6,n2,0S, 
8E,3A,FD,A9,ER,85,82,85, 
83,A93,EC,8D,06,A7,n2,05, 
AD,EA,A6,C9,20,F0,08,BD, 
C5,80,3D,78B,A3,CA,10,F7, 
30,09,BD,B39,80,30,78,A3, 
CA,10,F7,A9,4C,8D,85,#5, 
A9,ES,8D,86,A5,A9,R5,8D, 
87,45,50,49,00,8D,3A,FD, 
A9,20,BD,EE,AB,8D,EA,A6, 
A9S,F0,85,82,A3,EF,85,83, 
AD,3A,FD,D®,0B,rR2,05,BD, 
BF,880,30,78,A3,CA,10,F7, 
A9,10,8D,06,R7,n9,10,8D, 
85,A5,A3,07,8D,86,#5,#9, 
C9,80,87,A5,60,29,8E,83, 
20,79,00,F®,1E,20,52,82, 
F0,06,8E,61,E4,8C,62,E4, 
20,73,00,F0,0E,20,FD,AE, 
20,52,82,F0,06,8E,SF,E4, 
8C,60,E4,A9,2C,R0,83,8D, 
02,03,8C,03,03,8C,76,E4, 
20,07,AA,A9,20,20,16,E7, 
AD,61,E4,85,14,85,63, AD, 
62,E4,85,15,85,602,20,13, 
A6,30,05,A9,21,20,16,E7, 
20,D01,BD,20,60,A5,86, 7A, 
84,7B,20,73,00,RA,DO,12, 
A9,83,RBd,A4,8D,02,03,8C', 
03,03,19,00,8D0,76,E4,4C, 
9A,81,18,AD,61,E4,85,14, 
6D,5F,E4,8D,61,E4,AD,62, 
E4,85,15,6D,60,E4,8D,62, 
E4,C9,FA,B®,D3,8R,C9,21, 
FO,Al,4C,9F,A4,A2,OA,BE, 
SF,E4,BE,61,E4,A2,00,8BE, 
60,E4,BE,62,E4,60,F0,0On, 
20,A0,81,F0,08,68,68,4C, 
B8,AF,HC,44,AB,AD,7F,E4, 
AE,80,E4,20,4B,82,B0,06, 
AD,01,B1,5F,F,15,20,7D, 
FD,20,5E,BF,20,4B,82;, RD, 
01,B1,5F,F0,09,20,86,FD, 
20,20,82 ,4C,3A,81,n2,02, 
A0O,00,38,31,FB,E6,FB,D®, 
02,E6,FC,CA,190,F5,29,40, 
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82,4C,3A,B1,A2,00,2C,R2, 
80,8E,5F,E4,20,79,00,D9, 
03,4C, 9A,84,20,A0,81,n2, 
40,86,3D,R2,03,86,3E,20, 
1A,85,8C,6D,BF,88,30,1B, 
AD,SF,E4,10,00,A9,90,85, 
3D,20,73,00,20,1A,85,8C, 
6E,BF,20,73,00,20,52,82, 
20,79,00,D00,6C,8E,63,E4, 
8C,64,E4,20,50,FD,A9,60, 
8D,14,A7,80,2C,AB,20,D7, 
AA,20,F4,81,80,46,20,11, 
82,B0,41,20,E1,FF,FO,3C, 
84,09,20,37,85,80,30,AD, 
SF,E4,30,40,84,09,49,91, 
20,0C,E1,n5,39,A6,3A,20, 
4B,82,20,639,A6,n4,09,18B, 
AD,63,E4,69,FF,80,63,E4, 
B0,03,CE,64,E4,0D,64,E4, 
FO,OA,AD,SF,E4,30,C9,20, 
53,BF,D®,BS,A9,4C,8D,14, 
A7,A9,20,80,2C,AB,4C,9R, 
81,4C,R6,83,20,43,84,4C, 
5D,84,n4,09,98,18,65,7n, 
85,5F,A5,7B,69,020,85,60, 
38,AD,6E,BF,ED,6D,BF,BD, 
65,E4,F0,20,10,3C,18,#5, 
SF,6D,6D,BF,85,FD,A5,60, 
69,00,85,FE,85,FC,AS,FD, 
6D,65,E4,85,FB,B0,02,C6, 
FC,20,20,82,AC,6E,BF,B8, 
30,99,83,30,23,91,5F,Co, 
00,00,F4,20,33,n5,20,F4, 
81,18,45,093,6D,6E,BF,AB, 
88,60,18,A5,2D,85,5A,6D, 
65,E4,85,58,85,2D,48,45, 
2E,85,5B,69,20,85,59,85, 
2E,AB,68,20,B8,A3,4C,DD, 
84,20,79,00,80,66,E4,n®, 
00,20,73,00,F0,0B,CD,66, 
E4,F0,05,31,30,C8,D0, Fi, 
60,68,68,4C,A6,83,E6,09, 
A4,09,A2,00,B1,7A,F0,10, 
DD,40,03,D0,F1,E8,EC,6D, 
BF,F0,03,C8,D0,EE,18,60, 
38,60,n2,01,2C,R2,FF,oL, 
A2,00,8E,70,BF,A2,00,6E, 
66,E4,20,8E,83,20,n0,81, 
FO,21,20,FD,AE,20,52,82, 
F0,06,BE,61,E4,8C,62,E4, 
20,79,00,F®,0E,20,FD,RE, 
20,52,8?,F0,06,8E,SF,E4, 
8C,60,E4,20,79,00,F0,03, 
4C,A6,83,20,8F,FD,CS,60, 
D0,10,45,7A,C5,5F,D®,On, 
A9,00,80,67,E4,8D,68,E4, 
F0,20,20,F4,81,AD,7C,E4, 
C5,60,00,07,AD,7B,E4,CS, 
5F,F®,05,20,53,BF,DO,En, 
AS,39,8D,67,E4,A5,3A,BD, 
68,E4,20,5E,BF,20,4B,8®e, 
20,50,FD,20,F4,81,B0,0D, 
AS,39,80,69,E4,AS,3A,8D, 
6R,E4,4C,EE,85,A9,FF,8D, 
69,E4,8D,6R,E4,20,41,86, 
B0,08,20,52,86,B0,03,#9, 
00,2C,n9,80,8D,6F,BF,F®, 
05,AD,70,BF,F0,30,20,C1, 
88,20,F4,81,B0,54,20,11, 
82,B®,4F,AD,6B,E4,8D, 74, 
E4,6D,5F,E4,8D,6B,E4,AD, 
6C,E4,80,75,E4,48,6D,60, 
E4,8D,6C,E4,68,C9,FA,B®, 
48,20,53,BF,D0,D3,n9, 7A, 
AB,87,20,1E,AB,4C,F1,86, 


AD,62,E4,CD,BA,E4,90,08, 7i 
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D®,06,AD,61,E4,CD,693,E4, 
60,RD,68,E4,CD,62,E4,30, 
08,D00,06,AD,67,E4,CD,61, 
E4,60,AD,6F,BF,D9,32,AD, 
75,E4,CD,6A,E4,39,4D,DO, 
08,AD,74,E4,CD,69,E4,39, 
43,AD,SF,E4,C9,21,D9,05, 
AD,SO,E4,F®0,B1,28,393,86, 
A3,74,R0,87,20,1E,AB,4C, 
07,86,4E,60,E4,6E,5F,E4, 
60,AD,61,E4,AE,62,E4,20, 
4B,82,B0,92,29,50,FD,20, 
F4,81,B80,10,AD,75,E4,CS, 
3A,30,09,D0,C4H,AD,74,E4, 
C5,39,B®,BD,AD,SA,FD,D®, 
08,AD,70,BF,D8,20,20,62, 
87,AD,6F,BF,D0,25,20,C1, 
88,20,F4,81,B8,1A,20,11, 
82,B0,15,A8,02,AD,74,E4, 
91,7A,C8,AD,75,E4,91,7#A, 
20,AD,88,20,53,BF,D@,E1, 
4C,9A,81,20,C1,88,A9,04, 
8D0,02,03,A9,87,8D,03,03, 
4C,61,89,A49,53,80,02,03, 
A9,87,80,03,03,20,03,88, 
20,F4,81,B0,36,20,11,82, 
BO,31,AD,74,E4,85,14,AD, 
75,E4,85,15,20,AD,88,A®, 
04,B1,7A,99,FC,01,F0,03, 


C8,D0,F6,C8,84,02,20,53,. 


BF,A®,02,B1,7A,8D,7F,E4, 
C8,B1,7A,BD,80,E4,A4,02, 
4C,8F,89,R9,01,85,BA,‘, 
9A,89,n9,04,80,02,03,A9, 
87,80,03,03,45,39,85,14, 
AS5,3A,85,15,%0,70,BF,10, 
9A,A0,05,R9,00,39,FB,01, 
4C,8F,89,53,54,2F,32,20, 
00,00,4E,45,49,4E,21,00, 
60,20,8F,FD,20,F4,81,BO, 


F7,A9,24,85,0F,A9,01,85, _ 


08,C8,B1,7A,F0,45,30,12, 
C9,2C,F®,4A,C9,3A,FO,ED, 
C3,22,D0,ED,AS,OF,45,0F, 
85,0F,24,0F,70,E3,B1,7A, 
C9,8F,F0,27,C3,89,F0,34, 
C9,8#,F0,30,C9,8D,Fo,2C, 
C9,A7,F0,28,C9,31,F0,18, 
C3,CB,D8,C5,C8,B1,7A,Fo, 
0A,C9,20,F0,F7,C3,A4,F®, 
13,D0,B9,20,53,BF,D®,A4, 
A3,80,85,08,D0,RB,A5,08, 
30,02,10,A5,C8,B1,7A,30, 
AS,C9,20,F0,F7,84,09,rR2, 
00,B1,7A,C9,3A,B0,0B,CS, 
30,30,07,30,40,03,E8,C8, 
D®,EF,A9,00,3D,49,03, AD, 
66,E4,F0,02,18,60,8E,6D, 
BF,CA,30,AE,20,74,FD,AS, 
09,20,81,E4,20,79,00,20, 
EB,A9,AS,14,85,39,8D,5D, 
E4,A5,15,85,34,8D,5E,E4, 
CD,80,E4,90,32,D0,07,#5, 
39,CD,7F,E4,30,29,20,11, 
B2,B0,24,20,78,88,30,16, 
20,53,E4,20,DD,BD,n0,00, 
BS,201,01,F0,06,39,39,03, 
C8,D00,F5,8C,6E,BF,20,2E, 


GE,BF,A9,58,30,8F,03,Ca, 
DO,FA,18,60,18,AD,74,E4, 
6D,5F,E4,8D,74,E4,AD,75, 
E4,60,60,E4,8D,75,E4,60, 
AD,61,E4,8D,74,E4,8D,6B, 
E4,AD,52,E4,80,75,E4,8D, 
6C,E4,AD,7F,E4,AE,80,E4, 
20,4B,82,4C,50,FD,20,E5, 
88,4C,39,81,45,2C,A0,01, 
91,2B,20,33,A5,18B,A5,22, 
69,02,85,2D,n5,23,69,00, 
85,2E,60,0D,4D,45,52,47, 
49,4E,47,0D,00,R2,00,56, 
93,49,01,20,CC,E1,20,DB, 
89,20,F1,8C,A6,BA,Ch,Do, 
23,86,0A,A6,2D,A4,2E,EB, 
86,C3,00,01,C8,84,C4,38, 
20,33,F5,80,70,C4,38, FO, 
05,30,1C,4C,35,A4,E4,37, 
BO,FS,539,13,20,AF,FS,20, 
C5,8C,20,CF,FF,A5,30,F0, 
03,4C,88,8B8,20,CF,FF,RS, 
FC,A0,88,20,1E,AB,A9,67, 
AB,89,80,02,03,8C,03,03, 
CE,2C,03,4C,7B,A4,20,E1, 
FF,FO,2F,20,C3,89,20,C3, 
89,F0,25,20,C3,89,85,14, 
20,C3,89,85,15,40,05,20, 
C3,89,39,FB,01,F0,07,#5, 
990,00,0F,C8,D0,F1,R2,FF, 
86,7A,R2,01,86,7B,4C,A2, 
A4,18,EE,2C,03,08,48,R9, 
83,80,02,03,A9,A4,8D,03, 
03,A6,BA,CA,F®,03,20,03, 
80,68,28,30,03,4C,04, El, 
A9,64,40,A3,20,1E,AB, HC, 
9A,81,A6,BA,CA,F0,03,4C, 
CF,FF,84,02,40,00,B1l,C1, 
E6,C1,D08,02,E6,C2,n4,02, 
AA,50,R3,08,85,FC,n2,01, 
86,40,86,FB,46,33,86,41, 
20,06,22,20,57,E2,85, FC, 
86,FD,34,FE,20,06,E2,20, 
00,E2,86,FB,60,n2,01,2C, 
A2,00,86,33,20,n0,81,20, 
DB,89,20,F1,8C,A6,Bn,Ca, 
FO,0RA,A5,33,F0,06,20,RF, 
FS,28,C5,8C,AD,7F,E4,AE, 
80,E4,20,4B,82,20,50,FD, 
AS,SF,85,03,45,60,85,CH, 
20,5E,BF,20,4B,82,n0,00, 
B1,5F,85,FD,A9,00,91,5F, 
C8,81,5F,85,FE,A9,00,31, 
5F,31,5F,20,E5,88,05,33, 
BO, 0C,A6,2D,A4,2E,nS,7n, 
20,08,FF,4C,C8,8A,A2,FF, 
86,92,E8,86,B9,20,F4,81, 
AS,BA,CA,D®,3B,8E,6B,BF, 
E8,86,0R,R9,8B,8D,44, FB, 
A9,8%,8D,45,FB,20,39,F5, 
BQO,45,RD,6B,BF,F®,40,4C, 
CS,8A,R5,C2,C9,07,90,09, 
AS,BD,28,EB,84,B0,05,D®, 
06,4C,DB,FC,8C,6B,BF,a9, 
01,85,47,68,68,4C,48,FB, 
A®,59,20,2B,F1,20,CF,FF, 
20,CF,FF,20,E1,FF,FO,®E, 
20,CF,FF,20,EB,8n,BO,04, 


390,20,43,84,4C,32,87,r4, 
03,20,2E,30,4C,32,87,20, 
C1,88,20,F4,81,B0,1E,#5, 
3A,CD,SE,E4,00,07,45,33, 
ED,SD,E4,F9,08,20,AD,88, 
28,53,BF,DO,ES,AE,74,E4, 
AD,75,E4,38,60,A2,04,BE, 
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F@O,F1,D0,03,49,1C,38,08, 
48,20,03,8n,4C,AA,89,18, 
930,F5,R0,00,A5,FD,31,5F, 
E8,AS,FE,31,5F,A9,DB,8D, 
44, FB,A9,FC,8D,45,FB,4C, 
E5,88,E6,02,#4,02,C0,02, 
99,08,D1,7A,D9,23,C3,00, 


F0,04,9,00,18,60,C0,094, 
30,F8,20,53,BF,20,F4,81, 
B0,0B,20,11,82,B0,06,n0, 
FF,84,02,00,E5,49,01,18, 
60,38,60,24,20,39,8D,n5, 
FC,F®,1A,C9,01,00,69,#0, 
02,B1,FD,CD,1C,8B,D0,60, 
38,R9,0B,4C,1F,BE,20,39, 
8D,AS,FC,D0,53,49,01,85, 
FC,A2,1C,A0,8B,86,FD,84, 
FE,20,C5,8C,A9,0D,20,02, 
FF,20,CF,FF,AS,30,F0,03, 
4C,88,8B,20,CF,FF,n9,0D, 
20,D2,FF,20,CF,FF,20,CF, 
FF,FO,1C,20,ED,F6,D0,03, 
4C,88,8B,20,CF,FF,AA,e®, 
ECF,FF,28,CD,BD,20,CF, FF, 
FO,DC,20,D2,FF,DO,F6,20, 
23,8D,4C,9N,81,A49,01,2C, 
A9,00,85,0A,n2,01,86,4B, 
AB,42,86,41,20,F1,8C,20, 
6F,E1,4C,9A,81,20,39,8D, 
AS,FC,D0,06,20,03,8D,4C, 
17,80,49,0F ,85,49,85,41, 
20,E6,8C,20,63,A6,4C,74, 
A4,A9,0F,2C,A9,3A,8D,E1, 
BB,20,39,80,49,08,85, FC, 
A9,DB,85,FD,R9,8B,85,FE, 
DO,D8,4D,2D,57,07,1C,01, 
OF,00,20,AE,BD,AS,FC,Do, 
23,4C,1A,8E,20,DA,8D,30, 
SC,A2,00,86,41,E8,86,33, 
85,40,4C,0B,8n,n9,0F,2D, 
C3,FF,20,AE,8D,R9,01,85, 
40,85,41,20,F1,8C,29,Dn, 
80,90,07,49,00,85,33,4C, 
0B,8R,20,59,E1,4C,88,88B, 
20,393,8D,AS,FC,D@,03,4C, 
1A,BE,A2,00,86,33,20,F1, 
8C,4C,30,89,20,39,80,#9, 
01,85,42,4C,91,8B,ne,0F, 
86,490,86,41,AE,7A,E4,86, 
FB,A2,08,86,FC,E8,8n,18, 
59,20,8D,B8,8C,569,20,8D, 
B3,8C,49,B2,85,FD,rR9,6C, 
85,FE,R0,00,B1,7A,F®,09, 
C3,2C,F0,05,20,9E,B7,86, 
FB,20,F6,8D,10,00,B1,7A, 
F0,17,20,9B,B7,E0,0C,BD, 
38,E0,08,90,34,8R,18,69, 
20,80,B8,8C,69,20,80D,B9, 
8C,A6,FB,A9,00,20,CD,BD, 
AS,3E,20,D02,FF,20,E6,8C, 
AD,B8,8C,29,0F,8D,7A,E4, 
AA,AI,00,28,CD,BD,4C,9A, 
81,4D,2D,57,77,00,02,29, 
49,4C,17,8E,A9,01,80,79, 
E4,4C,00,80,A2,01,86,40, 
CA,86,41,F0,08,A2,0F,66, 
40,86,41,D0,00,20,E6,8C, 
AB,40,4C,C6,FF,20,E6,8C, 
AG,4®,4C,C9,FF,A5,40,20, 
C3,FF,28,F1,8C,4C,C0,FF, 
AS,4O,AB,FB,A4,41,20,BA, 
FF,AS,FC,AB,FD,A4,FE,4C, 
BD,FF,AS,40,20,C3,FF,n9, 
00,85, FC,28,CE,8C,20,CF, 
FF,C9,30,D®,01,60,n2,00, 
3D,00,02,E8,28,CF,FF,SD, 
00,02,C3,20,D0,F5,A3,00, 
SD,01,02,20,D07,AA,A3,00, 
AD,02,20,1E,AB,4C,9R,81, 
AD,7A,E4,85,FB,A0,00,B1, 
7A,F0,54,C9,3A,B0,09,C9, 
39,30,05,20,9E,B7,86,FB, 
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AB,00,8B1,7A,C9,26,D9,03, 
20,73,00,AE,73,E4,F0,17, 
A2,00,8E,79,E4,20,9E,AD, 
20,A3,B6,85,FC,A6,22,86, 
FD,A4,23,84,FE,DO,26,46, 
7A,86,FD,A6,7B,86,FE,RD, 
00,81,7A,F0,12,C9,2C,Fo, 
26,C8,B1,7A,4C,84,8D,C8, 
B1,7A,88,C9,41,BO,F2,B4, 
FC,38,20,B1,E4,R0,00,84, 
42,B1,7A,F0,05,20,98B,B7, 
86,42,4C,F6,8D,AD,7A,E4, 
85,FB,A9,00,B1,7A,FO,DF, 
C9,3R,B0,09,C3,39,90,05, 
20,9E,B7,86,FB,A0,00,Bl, 
7A,C9,2C,D0,03,20,73,00, 
20,79,00,20,R0,81,4C,51, 
8D,AD,7E,E4,C3,F9,D0,13, 
AD,7D,E4,C9,FF,D®,0C,AD, 
80,E4,D8,07,AD,7F,E4,D® 
02,18,60,38,60,R6,FB,E®, 
08,39,1B,E0,0C,B0,17,#3, 
00,85,39,8R,20,0C,ED,rs, 
F0,29,B9,ED,A5,30,08,29, 
FE,ED,28,D0,07,60,49,09, 
PC,A9,08,2C,A9,05,4C,04, 
E1,4C,9A,81,20,n0,61,939, 
01,80,66,E4,AD,7F,E4,AE, 
80,E4,20,4B,82,20,50,FD, 
20,F4,81,BO,E4,20,11,82, 
BO,DF,A5,39,8D,6B,BF,#S, 
3A,8D,6C,BF,AD,7B,E4,6D, 
77,E4,AD,7C,E4,8D,78,E4, 
C8,B1,74,F0,0B,C3,8F,D®, 
F7,CO,04,F@,15,4C,90,8F, 
AD,77,E4,8D,7B,E4,AD,78, 
E4,8D,7C,E4,20,53,BF,4C, 
39,8E,20,6B,FD,20,82,87, 
B0,6D,8E,6D,BF,CA,30,28, 
AE,6B,BF,AD,5B,BF,8C,“n, 
03,20,53,E4,20,0D,BD,r2, 
FF,E8,BD,21,01,F0,0F,DD, 
40,03,F0,FS,AC,4n,03,88, 
20,32,87,4C,81,8E,1D,40, 
03,D0,F1,AD,77,E4,85,5F, 
AD,78,E4,85,60,A0,01,B1, 
SF,F0,23,C8,B1,5F,AA,C8, 
B1,5F,28,CD,87,20,DD,BD, 
ADO,00,89,01,01,F0,06,39, 
90,03,C8,D0,F5,8C,6E,BF, 
20,R3,84,4C,2D,8E,A9,80, 
8D,90,03,A0,01,D®,EE,nD, 
77,E4,85,FD,AD,78,E4,85, 
FE,20,20,82,4C,2D,8E,68, 
A9,00,31,7A,C8,98,18,65, 
7A,85,FB,AS,7B,69,00,85, 
FC,4C,F®,8E,A0,01,8C,66, 
E4,88,20,BE,A6,38,00,8l, 
E4,A®,04,8C,65,E4,n9, FF, 
85,02,85,0B,C8,8C,5F,E4, 
B1,7A,F0,53,A6,0B,10,F4, 
C9,22,F0,22,A6,02,10,EC, 
C9,20,F0,23,C9,3A,F0,DE, 
C9,8F,F®,30,C9,89,F0,30, 
C9,CB,F®,2C,C9,8A,F0,28, 
C9,8B,F0,24,D0,CE,AS,FF, 
45,02,85,02,4C,2D,8F,20, 
14,30,C8,B1,7A,C3,20,Fo, 
F9,20,21,30,20,20,82,AC, 
SF,E4,D@,B4,A9,00,85,0B, 
A9,00,80,65,E4,F0,A5,C8, 
C8,38,B1,7A,F0,55,E5,78B, 
FO,12,4A,30,09,88,38,B1, 
7A,C8,ES,7A,90,06,AC,5F, 
E4,4C,1E,8F,AD,65,E4,FO, 


se 


F5,C8,B1,7A,An,C8,B1,7RA, 
28,53,E4,20,DD,BD,29,1E, 
AB,20,74,FD,20,82,87,B2, 
25,R2,FF,E8,BD,01,01,F®, 
0C,DD,40,83,F0,FS,88,02®, 
92,87,4C,C0,8F,1D,40,03, 
D®O,F4,28,2E,90,AC,5F,Es%, 
4C,1E,BF,4C,3A,81,290,2E, 
9®,AC,5F,E4,AS,02,30,08, 
A9,22,91,7A,C8,EE,SF,E4, 
A9,3R,31,7A,C8,29,14,90, 
18,C8,C8,C8,C8,A5,02,30, 
01,88,20,21,90,20,20,82, 
4C,22,BF,18,938,65,7A,85, 
FB,AS,7B,69,00,85,FC,60, 
FB,AS,7B,69,00,85,FC,60, 
18,98,65,7A,85,FD,AS,7B, 
69,00,85,FE,68,AS,FD,85S, 
7A,AS,FE,85,7B,60,A9,ER, 
8D,03,80,8D0,04,80,8D,04, 
80,4C,9A,81,A9,00,80D,03, 
80,19,3B,8D,04,80,4C,3#, 
81,4C,08,AF,A9,76,R0,S0, 
8D,EB,A7,8C,EC,A7,A3,00, 
8D,47,E4,20,79,00,F0,O®n, 
C9,48,D0,ES5,80,47,E4,20, 
73,00,20,1B,E4,A5,7B,C9, 
03,30,43,AD,45,E4,C5,3#, 
D0,07,AD,44,E4,C5,39,FP®, 
00,20,04,E4,45,39,8D,4#4, 
E4,A5,3A,8D0,45,E4,20,94, 
E3,AD,47,E4,F0,23,AD,8D, 
02,C9,02,F9,46,C9,01,FP, 
15,45,C5,C9,40,Fd,EF,CS, 
39,D0,2E,EE,46,E4,20,84, 
E3,20,F3,90,F0,EO,4C,AE, 
A7,AS,C5,C9,39,00,0B,EE, 
46,E4,20,94,E3,20,F3,30, 
FO,EF,AD,8D0,02,C9,02,F®, 
00,C9,01,F0,E4,C9,04,DO, 
DD,20,F3,99,F9,D8,80,47, 
E4,F®O,CE,A9,00,8D0,47,E4, 
FO,EF,AB,00,CA,DO,FD,8B, 
DO,FA,60,A2,1E,8E,69,E4, 
20,79,00,20,R9,81,F2,30, 
A2,00,8E,69,E4,R2,03,DD, 
8D,E4,F®,12,CA,10,F8,C9, 
20,F0,17,C9,2C,F0,13,C9, 
09,F0,15,4C,08,AF,A9,01, 
OR,CA,10,FC,00,69,E4,BD, 
63, E4,20,73,00,4C,0E,31, 
AS,B7,AO,E4,290,31,32,C3, 
4A,F0,06,09,4E,F0,19,08, 
EF,A9S,CB,A®,E4,20,31,302, 
B®O,F7,20,6B,49,A5,15,D2, 
FO,AS,14,C9,0D,19,EA,2C, 
AS,03,BD,6A,E4,A2,00,8E, 
73,E4,C9,03,F9,1B,49,21, 
AOd,32,20,31,92,B0,F7,20, 
6B,A9,A5,15,D®,F®,A6G, 1%, 
FO,04,E0,07,00,E8,BE,73, 
E4,A9,38,AB,E4,22,31,32, 
BO,F7,20,6B,A9,A5,15,D0, 
FO,A6,;,14,E0,51,10,EA,E®, 
14,30,E6,8BE,50,E4,AD,63, 
E4,29,902,F0,19,49,01,r®, 
92,20,31,32,C39,4A,F0,06, 
C9,4E,F92,05,D®,EF,A9,01, 
2C,A9,00,8D,5F,E4,20,50, 
95,R2,03,R9,01,A8,38,0#, 
AB,2D,59,E4,D8,18,CA,19, 
FS,A2,04,19,00,20,30,RAR, 
20,B5S,AB,4C,94,81,4D,53, 
E4,80,69,E4,8A,0A,AA,BD, 
FA,31,48,5D,F9,91,48,60, 
91,95,18,37,B8,37,3D,S2, 
00,53,54,45,55,45,52,5A, 
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45,49,43,48,45,4E,0D,20, 
49,4D,29,4B,4C,41,52,54, 
45,58,54,3F,20,4R,3D,00, 
53,45,4B,2D,41,44,52,45, 
53,53,45,3F,20,30,3D,00, 
29,1E,AB,20,60,45,86,7n, 
84,7B,4C,73,00,A2,00,n9, 
06,80,64,E4,20,43,34,20, 
83,95,29,49,97,20,F4,81, 
50,69,20,11,82,B0,64,#9, 
FF,85,FE,A6,39,A5,3A,20, 
BB,34,#9,20,R6,FE,EB,SD, 
00,02,E0,05,90,F8,86,FE, 
A9,00,85,@0F,8D,34,32,C8, 
B1,7A,80,63,E4,FO,3F,20, 
6F,35,24,0F,30,4®,AE,sn, 
92,00,3B,C9,8F,00,03,80D, 
9A4,32,C9,3A,F®,0C,4C,29, 
93,00,AD,63,E4,20,3D,33, 
D0,D5,20,85,33,A2,FF,A9, 
20,E8,30,00,02,E0,04,D0, 
F8,49,34,86,FE,20,90,33, 
4C,71,92,4C,25,95,20,85, 
93,20,53,BF,D0,87,AD,5F, 
E4,00,03,4C,93B,92,Ae, FF, 
E8,BD,DF,93,F0,4C,CD,63, 
E4,DO,FS,A9,FF,80,60,E4, 
86,62,A2,FF,C6,62,30,08, 
E8,BD,04,94,30,F6,10,F8, 
A9,5B,20,90,33,E8,BD,04, 
934,48,29,7F,20,90,93,68, 
10,F3,EE,62,E4,C8,B1,7n, 
CD,63,E4,FO,FS,AD,62,E4, 
F0,07,AA,E8,A9,00,20,88, 
94,A9,5D,20,90,93,88,4C, 
78,92,AD,63,E4,4C,3B,'S2, 
AS,OF,10,03,4C,C7,92,AD, 
63,E4,30,03,4C,9B,32,C3, 
AF,F0,08,C9,80,F0,04,C9, 
AA,BO,03,20,CC,33,38, AD, 
63, E4,E9,7F,AnA,84,65,n0, 
FF,CA,F0,08,C8,89,9E,n®, 
10,FA,30,F5,C8,B3,39E,n®, 
48,29,7F,20,90,93,68,1®, 
F3,A4,65,B1,7A,C9,A2,30, 
OD,A2,06,D0,91,E4,F0,06, 
CA,19,F8,4C,78,92,20,CC, 
33,4C,78,92,20,ED,F6,D0, 
03,4C,7B,E3,A2,00,BD,0®, 
02,20,0C,E1,EB,C6,FE,10, 
FS,4C,D7,AA,85,31, 80,48, 
98,48,A5,31,A6,FE,EB,SD, 
00,02,86,FE,E8,EC,60,E#, 
DO,12,20,85,33,R2,FF,n9, 
20,E8,30,00,02,EC,64,E4, 
DO,F7,86,FE,58,n8,68,rn, 
AS,31,60,8N,'48,98,48,#9, 
20,A6,FE,E®,05,F0,ED,DD, 
080,02,F0,E8,D00,C8,11,1D, 
51,30,A0,13,33,94,12,32, 
90,05,1C,9F,9C,1E,1F,S3E, 
81,95,96,97,98,39,3A,38B, 
85,86,87,88,89,8R,8B,6C, 
03,14,00,44,4F,57,CE,52, 
49,47,48,D4,55,D8,4C,45, 
45,04,53,48,2E,53,50,41, 
43,C5,48,4F,4D,C5,43,4C, 
D2,49,4E,53,D4,52,56,53, 


20,4F,CE,52,56,53,20,4F, 
46,C6,42,4C,CB,57,48,D4, 
52,45,C4,43,59,CE,50,55, 
D2,47,52,CE,42,4C,05,59, 
45,EC,4F,52,41,4E,C7,42, 
52,57,CE,4C,2E,52,45,C4, 
4D,2E,47,52,45,D9,44,2E, 
47,52,45,D9,4C ,2E,47,52, 


CE,4C,2E,42,4C,05,4C,2E, AS,FC,69,00,85,60,85,FC, 
47,52,45,D9,46,B1,46,B3, 29,58,R3,18,60,84,43,8D, 
46,B5,46,B7,46,B2,46,B4, 63,E4,20,F4,81,B0,24,20, 

:46,B6,45,88,53,54,09,44, 11,82,B0,1F,20,5C,39,#8, 
45,CC,84,FD,20,53,E4,20, 01,85,0F,20,73,00,C9,00, 
DF,BD,AQ,FF,C8,B9,00,01, F®,14,20,6F,95,24,0F,30, 
FO,05,20,90,33,D8,FS,R4, F2,C9,3A,F0,EA,CD,63,E4, 
FD,60,86,FD,BD,00,95, An, D0,E3,18,A4,43,60,20,53, 
AS,FC,85,FE,20,15,95,99, BF,DO,CF,A9,2E,20,90D,93, 
20,20,0C,E1,ES,FE,AB,FE, AG,FE,EC,64,E4,DO,F6,60, 
EC,64,E4,90,F2,A6,FD,BD, A2,02,20,43,34,20,63,97, 
11,95, AA,20,15,95, 20,07, 8D,67,E4,A9,89,20,3B,97, 
AA,AE,60,E4,A9,2D,20,0C, A9,A7,20,3B,97,A9,8A,20, 
s 3B,97,A9,CB,20,3B,97,4C, 
7F EN AD. BO.EM.2O.CD.ED. 83,95, 48,20, A8,97,68,20, 
A9,2D,4C,0C,E1,0D,0D,50, DEE EN DE SREEERLE 
52,4F,47,3A,A0,0D,2D,0D, BE DOSOE SE ODE NE 
56,41,52,49,41,42,4C,C5 D0,0n,20,89,97,90,05,68, 
49,CE,0D,0D,0D,47,4F,54, 68,4C,B93,95,20,EF,96,90, 
CF,S6,4F,CE,0D,0D,0D,47, E3,60,49,00,A8,91,2D,C8, 
4F}53,55,C2,00,08,15.1F. 91,2D,C8,A9,02,28,7D,97, 
07,13,1C,1C,BD,E6,34,4B, AD,60,E4,4A,4A,18,69,08B, 
23.7F.20.0C.E1.E6.FE.EB 8D,64,E4,69,18,65,2D,85, 
68,10,F1,50,AD,6n,E4,CH, : 2F,AS,2E,69,00,85,30,60, 
04,B0,08,AD,69,E4,F®,03. 20,73,00,B0,19,20,6B,A9, 
20,40,95,4C,CA,31,0D,3C, AS,14,8D,6B,E4,A5,15,8D, 
54.41.53.54 45. 3E.00'A9) 2 6C,E4,20,2F,S6,B0,08,20, 
37,A0,35,20,1E,AB,AS,C6, 73,00,C3,2C,F0,E2,18,60, 
Fo‘ FC AS 00.85.C5.50.#8 : AD,7F,E4,85,14,AD,80,E4, 
04.20.03 FF A904 AE SR. 85,15,20,13,A6,4C,50,FD, 
E4 AC.73 E4 20.Ba,FF 20. 29,71,97,R2,01,8E,67,E4, 
CO FF AP O4 08 86.13 20. 20,R13,94,n0,00,A3,FF,S1, 
18.E1.28.4C.D7 AA 4B.cH. 2D,A9,01,20,7D,397,20,#9, 
22.00,06,AS,0F 493, FF,85. F 37,20,F4,81,B0,7C,20,11, 
OF ‚6B.60,A6,39,A5,an.uC, 82,B0,77,20,5C,39,A2,01, 
89.95 AE.7D.E4 AD TE E4 856,0F,CA,8E,68,E4,20,73, 
>28 CD. BD 22 D7 AR 4uc 07. 09,C3,08,F0,54,C3,8F,F®, 
AA,AD,03,20.n3,34,20,63, 50,29,6F,35,24,0F,30,EE, 
37,R9,00,80,67,E4,20,#3, £3,3A,F0,E2,C9,83,F0,35, 
97,49,8D,29,06,356,B®,®on, AE,6EB8,E4,D®,0E,AE,67,E4, 
20,89,37,B0,0B,29,EF,S6, EO,801,08,0A,C9,86,D0,D6, 
90,F6,20,83,35,4C,BC,S5, 20,73,00,R2,01,2C,A2,00, 
20.7C.35.20,62,FD.Ad,FF. 8E,68,E4,20,13,B1,30,C6, 
84, FE,CB,B1,FB,AA,86,14, 20,B5,38,82,C1,A9,00,SD, 
C8,B1,FB,85,15,05,14,F®, 02,02,BE,74,E4,20,60,39, 
5A,AS,15,20,8B,34,20,13, B0,15,4C,E7,37,28,73,00, 
A6,B0,05,A9,3F,20,30,33, D0,FB,C9,34,00,03,4C,DF, 
AD,67,E4,DO,1E,A9,2D,20, 4 37,20,53, BE HC5DE,97, 60; 
30,33,20,58,FD,A9,8BE,e0, D7,AA,A9,2D,20,0C,E1,c0, 
D6,36,30,08,A9,3F,20,3D, 7C,35,#D,67,E4,C9,01,F®, 
93,4C,04,96,A6,39,AS,3A, ; 41,28,62,FD,AO,FF,8B4,FE, 
20,88,34,29,0C,97,R0,01, C8,B1,FB,F0,0A,C9,FF,F®, 
C8,B1,FB,AA,CB,Bl,FB,Cs, 34,20,90,93,C8,D8,F2,28, 
FF,F®,0B,20,88,394,49,2C, 0C,37,20,E5,33,#8,20,CB, 
28,90,93,4C,09,96,C8,20, E Bl,FB,AA,CB,Bl,FB,CS,FF, 
ES,39,20,85,93,20,D7,AR, F0,0B,20,8B,34,A9,2C,20, 
4C,BF,95,4C0,25,35,20,62, 9D,933,4C,73,98,C8,20,ES, 
FD,AO,00,B1,FB,CB,11,FB, 33,20,85,93,20,D7,AA,4C, 
FO,3A,B1,FB,CD,6C,E4,F®, SD,38,20,83,95,CE,67,E4, 
10,8B0,31,C8,C8,B1,FB,C3, AD,67,E4,CS,FE,F0,0nA,C3, 
FF,DO,F8,C8,20,E5,59,00, FF,EO;,03 465, CE,97 ,HC5 E%, 
EO,88,B1,FB,C8,CD,58B,E4, 97,4C,25,95,A0,00,R2,01, 
99,E3,00,18,C8,C8,B1,FB, 84, FB,84,FC,B1,7A,F0,37, 
C9,FF,DO,F8,88,49,02,80, 30,35,C9,38B,F0,31,C9, 3A, 
74,E4,20,A1,96,B9,30,AD, F0,20,C9,20,F0,29,C3,22, 
00,4C,8E,96,88,19,06,8D, F0,25,C9,2C,F0,3A,B1,7#, 
74, E4,20,A1,96,B0,20,#0, 30,00,02,C9,24,F9,19,C9, 
00,AD,6B,E4,91,FB,C8,RAD, 25,F0,0C,C9,28,F0,35,C3, 
6C,E4,91,FB,C8,45,39,31, 23,F®,14,E8,C8,08,CD,EB, 
FB,C8B,AS,3A,91,FB,AS,FF, C8,B1,7A,C9,28,F9,C5,88, 
C8,91,FB,C8,91,FB,18,60, AD,67,E4,19,59,30,5C,AD, 
AS,2F,85,5A,18,6D,74,E4, 67,E4,30,57,C6,FC,D0,E3, 
85,2F,85,58,45,390,85,5B, AD,68,E4,F0,26,E8,00,4B, 
69,00,85,30,85,59,C5,38, 7 AS,FC,FO,)E4,C9,01,D0,BE, 
D®,06,45,2F,C5,37,B0,14, E6,FB,D®,BA,AD,67,E4,30, 
18,98,65,FB,85,5F,85,FB, 35,E6,FC,#5S,FC,C9,01,00, 
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C2,8E,75,E4,20,50,33,n0, A3,20,2C,49,25,2C,n9,24, 


00,F0,E8,AE,75,E4,EB,A9, 20,0C,E1,AD,F2,393,D0,3£E, 
31,3D,08,02,E8,49,30,3D, AS,3F,D®,03,A5,40,D9,05S, 

00,02,E8,C6,FB,30,07,#9, A3,9D,29,0C,E1,A9,28,20, 

2C,30,00,902,00,E8,49,29, OC,E1,AG,08B,8E,6B,E4,Ad, 
5D,20,02,E8,18,60,20,SC, FF,CB,B1,3B,AA,C8,B1,38B, 

A| 39,38,60,38,4C,81,E4,20, 8C,6C,E4,20,CD,BD,CE,68B, 
62,FD,AO,FF,CB,Bl,FB,FO, E4,F0,0B,A9,2C,20,0C,E1, 

35,C9,28,F0,31,C9,FF,Fo, AC,6C,E4,4C,n2,9B,n9,29, 

| 0F,D93,01,02,F0,EE,10,06, 20,0C,E1,4C,D2,38,R5,46, 
if 20,04,39,4C,63,99,A0,00, 29,7F,00,05,49,20,20,0C, 
AD,74,E4,18,69,04,80,74, El,AD,65,E4,00,05,A9,3D, 
| E4,20,A1,96,B0,CB,Ad,FF, 20,0C,E1,20,El,FF,D0,03, 
C8,89,01,02,31,FB,D®,FB, 4C,83,90,60,45,FD,A4,FE, 

C8,4C,8E,35,18,69,09,01, 20,A2,BB,20,DD,BED,4C,1E, 

02,00,D5,B1,FB,F0,05,C8, AB,A®,00,21,FD,An,C8,Bl, 

Bl,FB,DO,FB,20,ES,39,B1, FD,AB,8A,20,31,83,4C,EC, 

FB,C5,3A,F®,14,C9,FF,D9, SB,R0,00,B1,FD,An,C8,Bl, 

iR) F3,88,A9,02,80,74,E4,20, E FD,85,22,C8,B1,FD,85,23, 


Ah1,36,B0,2A,A0,00,4C,8E, A9,22,20,0C,E1,20,25,AB, 
36,88,B1,FB,C5,39,F2,CC, A9,22,4C,0C,E1,A9,00,Bl, 
C8,D9,D9,B1,FB,F,03,C8, FB,85,45,C8,B1,FB,85,46, 
D®O,F9,20,E5,99,B1,FB,CS, AS,45,293,7F,CD,7F,E4,930, 
FF,D®,F7,C8,98,18,65,FB, 3F,D9,03,45,46,29,7F,CD,; 
85,FB,99,02,E6,FC,A®,22, 80,E4,50,34,A5,45,29,7F, 
69,09,49,41,8D,7F,E4,RD, CD,7D,E4,F0,04,B9,23,39, 
00,8C,89,E4,A2,00,n9,5n, OB,R5,46,29,7F,CD,7E,E4, 
8D,7D,E4,BD,7E,E4,20,79, F0,02,B80,1C,18,45,3F,D®, 
02,F0,564,C9,AB,F,56,C9, BE,AS,49,D9,05,45,46,30, 
2C,F2,59,20,13,B1,90,57, OF,68,45,45,10,0R,60,#5, 
5D,7F,E4,E8,20,73,00,F0, 45,39,05,A5,46,18,01,60, 
eS,C3,2C,F0,25,C9,AB,F®, 38,60,41,52,52,41,59, 3A, 
1B,3D,7F,E4,20,73,00,F®, 28,22,AD,66,E4,80,67,E4, 


22,C8,2C,F0,1E,C9,AB,Do, AD,68,E4,D98,906,38,48,48, 
F3,E0,01,D8,32,E8,20,73, 4C,34,A8,20,14,9B,30,F5, 


Bi: 09,4C,0A,9A,E0,01,D00,27, AS,2F,85,FB,A5,39,85,FC, 
3 F2,F3,E0,01,F0,05,A9,5A, 28,D4,3E,50,00,B9,E6,AD, 
HM 3D,7F,E4,E0,01,09,18,FD, SF,E4,AE,590,E4,20,05,3£, 
j ; 7F,E4,8D,7D,E4,AD,80,E4, BO,E1,A98,02,51,FB,80,5F, 
8D,7E,E4,D®,0A,E0,00,0D, E4,C8,B1,F5,80,58,E4,CB, 
03,E8,D08,01,20,73,00,#9, Bl,FB,85,98,C8,38,20,B9, 
EO,8D,66,E4,80,67,E4,8D, 9E,28,1E,5C,88,D039,20,D7, 
88,E4,80,F2,99,8C,65,E4, AAR,20,07,4A,49,73,A0,9C, 
20,79,00,F8,4B,C9,2C,F®, 7 20,1E,AB,AS!OB,0A,AB,R2, 
42,C9,49,F0,392,C9,4E,F®, 09,88,38,B1,FD,E9,81,3D, 
34,AE,66,E4,E0,E9,D0,03, 00,02,E28,88,B1,FD,ES,00, 
8C,66,E4,C9,23,F8,0B,C3, 3D,008,0?2,E8,88,10,EB, 2, 
25,F0,0A,C9,24,F0,09,4C, 00,86,38,E8,8E,65,E4,E8, 
08,AF,AS,88,2C,A9,40,2C, 86, 3C,E8,86,3E,A2,40,86, 
A9,20,00,66,E4,8D,66,E4, 3D,20,63,3B,CE,65,E4,A5, 
8D,67,E4,D0,9E,8D0,68,E4, 03,85,43,20,D7,AA,A4,43, 
8C,F2,99,F0,06,80,F2,39, 88,R9,2D,20,0C,E1,88,10, 
8C,68,E4,20,73,00,D0,B3, FA,20,07,AA,A6,0B,8n,0n, 
AD,F2,99,D0,08,A3,00,8D, AB,CA,86,0F,88,8C,6B,E4, 
F2,99,4C,7B,9C,20,14,9B, A9,00,A2,01,80,6C,E4,2®, 
90,F3,20,62,FD,20,DF,9E, 53,E4,20,0C,BC,AC,6B,E4, 
BO,EB,20,D7,AA,20,1E,3C, Bl,FD,AA,88,B1,FD,88,6C, 
BO,16,19,02,20,B9,39E,AS, 6B,E4,20,53,E4,20,2B,Bn, 
3F,D®,0A,AS5,40,D90,03,4C, 20,38, BC,AC,6C,E4,R5,65, 
C2,90,4C,7D,3D,4C,E5,SD, AA,S1,3D,8D,69,E4,C8,r5, 
A3,07,A2,00,20,C5,39E,90, 64,91,30,8D,6A,E4,C8,8C, 
DC,BO,CA,A9,00,85,3F,85, 6C,E4,C6,0F,190,C9,45,08B, 
40,AD,67,E4,0A,B0,13,0n, ‘ BA,2B,EA,3E,A3,00,80,6D, 
BO,09,0A,90,16,A9,DF,85, E4,8D0,6E,E4,AS,3F,D9,6C, 
3F,D®,09,A9,80,85,49,99, AS,49,F0,45,A0,00,B1,FD, 
BF,2C,A9,7F,2D,67,E4,BD, C8,11,FD,F0,0E,AD,F2,99, 
67,E4,38,69,A5,03,F9,11, 00,03,20,08,39E,20,3D,9B, 
C9,15,B0,06,49,14,85,D3, 20,F2,3B,RD,F2,39,D0,0R, 
D2,07,A49,00,85,03,20,D7, A9,902,20,46,30,39,DD,HC, 
AAR,AS,D6,C9,13,30,0B,20, AO,SC,4C,093,3B,20,EA,SE, 
40,35,49,93,20,0C,E1,20, EE,6D,E4,09,03,EE,6E,E4, 
D7,AA,AS,45,29,7F,20,0C, AD,SE,E4,CD,6A,E4,30,08, 
E1,A5,46,23,7F,28,0C,E1, D®,05,AD,6D,E4,CD,69,E4, 
AS,3F,D®,0A,A5,40,D0,03, 68,R0,00,B1,FD,F®,0E,AD, 


108 @UD Sonderheft 2 
WWW -HONESONPUTERWOREN:-SOM 


DATA F2,393,D0,03,29,08,3E,20, 
DATA 3D,9B,20,E5,3B,AD,F2,39, 
DATA DO,CB,A9,05,29,A6,3D,30, 
DATA EO,4C,AD,SC,AB,00,B1,FD, 
DATA FO,BE,AD,F2,39,00,03,20, 
DATA 88,9E,20,30,38,29,02,5SC, 
DATA AD,F2,99,09,R5,49,03,20, 
DATA AB,3D,90,E0,4C,A®,SC,AD, 
DATA 6D,E4,80,63,E4,AD,6E,E4, 
DATA 80,64, E4,A9,00,A0,50,31, 
DATA 3B,88,10,FB,n2,00,8n,0n, 
DATA AB,C8,B1,3D,CD,64,E4,990, 
DATA 0A,D®,0B,88,AD,63,E4,Dl, 
DATA 30,90,03,E8,D0,E8,E0,00, 
DATA FO,30,CA,8E,6B,E4,20,79, 
DAIA 9E,AC,6B,E4,C8,98,0R,rB, 
DATA AD,71,E4,91,3B,C8,AD,72, 
DATA E4,31,3B,AD,6F,E4,®D,70, 
| i DATA E4,FO,1C,AD,6F,E4,80,63, 
| DATA E4,AD,70,E4,8D,64,E4,4C, 
| DATA 1D,9E,AD,00,AD,63,E4,31, 

DATA 3B,C8B,AD,64,E4,31,3B,60, 

DATA AE,63,E4,AD,54,E4,20,53, 

DATA E4,29,0C,ECL,20,48,E4,2®, 

DATA 14,BB,20,3B,BC,n86,65,BE, 

DATA 71,E4,A5,564,8D,72,E4,20, 

DATA 53,E4,20,0C,BC,20,48,E4, 

DATA 20,2B,BA,20,3B,BC,38,rD, 

DATA 63,E4,ES,65,BD,6F,E4,AD, 

DATA 64,E4,ES,64,8D,70,E4,68, 


Kombinierter Hexdump-Basiclader zu den LAUBTOOLS 


PROCEEDINGS 
SOFTWARE-ENGINEERING 
UND ee 
MANAGEMENT 


Software-Entwickler müssen zu- 
nehmend über das zu entwerfende 
DV-System hinaus unternehmens- 
übergreifende Informations-Zielset- 
zungen berücksichtigen. Da in vielen 
Fällen zugleich die Systemlandschaften 
völlig neu gestaltet werden müssen, weil 
die vorhandenen Konfigurationen nur 
unzureichend für ein „Work-Station“- 
Konzept taugen, bilden sich im Software- 
Engineering neue Prioritäten: Qualität had 
Portabilität. 

Zum Generalthema „Software-Engi- 
neering und Informations-Manage- 
ment“ haben sich auf dem Software- 
forum im Herbst ’85 in München nam- 
hafte Experten und Praktiker aus aller 
Welt geäußert. Der daraus entstehende 
Tagungsband liefert auf 831 Seiten das 
aktuellste Know-how zum Thema. 


Bestellnummer: ICW 81-8 
Preis: DM 110,— 


## EDITION 


Fachbücher für die Computerwelt 


DATA 18,65, FB,85,FD,AS,FC,69, 
DATA 00,85,FE,60,18,65,FB,B5, 
DATA FB,84,65,FC,8S,FC,AE,F2, 
DATA '99,00,0B,C5,32,30,06,00, 
DATA 04,AS,FB,C5,31,60,C5,30, 
DATA 90, FB,D0,F3,#5,FB,CS,or, 
DATA 60,18,65,FD,85,FD,90,02, 
DATA ES,FE,59,00,00,00,00,00, 


FOR A-2043 TO 10528 STEP 
8:5=-9:C=B:FOR B=D TO 7: 
GOSUB 6909490 
S=-S+H+L-C: C=S>255:5=255-5 
AND 255:POKE A+B,H+L:NEXT 
B: GOSUB 69840 
F$S="PRUEFSUMME OK”: IF S<> 
H*+L THEN ‚F$="ERUS]I 
PRUEFSUMMENFEHLER” : F=F+1 
GOSUB 60898: NEXT A:PRINT 
EDOWNI”F”FEHLER”: END 
READ H$:GOSUB 62059; H=L* 
16:H$=MID$& CHS,2) 

L=-ASE CHS+F”"X”)-4B: IF LO 
DR L>22 THEN 69089 
IF L<1B8 THEN RETURN 
L-L-7:IF L>9 THEN RETURN 

® FS="ERUSIEINGABEFEHLER”:L= 
O:F=F+1 
PRINT "ZEILE" PEEK (64)* 
ES6+PEEK- (63) F$: RETURN 


BE 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2.2 203 
Computer - Zubehör 


z.B. für den C-64 (u.a.) Leer. Baus. Fert. 
EPROM-Speicher-Bank (64k) 18,-- 34,95 44,95 
7-fach Betriebssystem-Umschaltplatine 72,.50,.23,95839595 
Subminiatur Adapter-/Umschaltplatine 9739719795 
3-fach Expansionsport-Erweiterung 1899255337935 943735 
3-fach Uerport-Erweiterung 12,50 22,50 


in Vorbereitung: 1MByte EPROM-Speicherbank f. ATARI 520ST 
hochauflösender Farbmonitor £. ATARI ST Preis a,Anfrage 
und jede Menge weiteres Zubehör (z.B. ATARI Steckverb.) 
EPROM!'s = Tagespreise * Disk's = 5.25"/DS-DD/10St./30,- 
-dito- jedoch bunt 32,- * 3,5"/8S8-DD/135 TPI/5 8t./45,- 
Joystick Super - 2000 (der mit dem Kabelfach) DM 24,95 


Bitte Info's anfordern ® Händleranfragen erwünscht! 


THOMAS FROHNERT, Computer & Electronic Vers. * 43 Essenl2 
Im Schollbrauk 57 % Tel.: 0201 / 32 68 61 


‚Besuchen Sie uns auf der HOBBY-TRONIC in Dortmund vom 


- 23.4.-27.4.1986, Computerschau Halle 4, Stand 4054 
KRLRRRRKKRERRRRRKKAKRERRRKKRRRHHAHRRAKKAKKRR KH RAKR AR AR KK 


M. Ahrens, Tel. 02302-53564 
Augustastraße 65, 581 Witten 


Atari dCASS DISK C64 
King of the ring 39,— 19,— *Bombjack 
Tigers in the snow \ *Sastalker Disk. 
“Jump Jet 5 ; Bounder/Metabolis 
“Ollies Follios "Legend ol amaz. womanx 
*Pola Position 39,— 59, Paradroid 
Geheimn. d. Aztekenm. x \ *Hardball x 
*Wintergames Rock'n Wrestie x 
*The neverending story *Time Tunnel x 
Battle for Brittain 
Arcade Hall of Fame x 


c 16 
Kung Fu Kid 
Jet Brix 
Basildon Bond 
"Goonies *Luna docking 
The Devi's crown , E Classics II x 
Tornado Load Level D.T. Star Events 
Masters of the lamps x . World Series Baseball 
Alien 8 auf Kassette . Atlantis 
*Friday, 13th E , "Olympiade 
Der blaue Kristall x , BMX Race 


Computer Spiele 


a CASS DISK 


* In Kürze lieferbar, Prais unverbindlich. Bitte Preisliste anfordern geg. 2.— DM In Briefmarken (m. Comp.an- 
gabe), Versand erfolgt per Nachnahme zzal. 4,— DM Portokosten od. Vorkasse. 
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Maschinensprache 
Schritt für Schritt 


Maschinensprache ist wegen ih- 
rem Tempo und ihrer Vielseitig- 
keit beliebt. Viele Computer-Hob- 
byisten trauen sich aber nicht an 
Assembler heran. Die erhöhte 
Leistung hat nämlich ihren Preis: 
Die Programmierung in der Spra- 
che des Prozessors ist ein Draht- 
seilakt ohne Sicherheitsnetz. Bei 
Programmfehlern verabschiedet 
sich der Rechner oft sang- und 
klanglos. Wer von der Basic-Pro- 
grammierung her eine reiche Pa- 
lette von Fehlermeldungen ge- 
wöhnt ist, muß umlernen. 

Zum Glück ist man bei der Fehler- 
suche nicht völlig auf sich selbst 
gestellt. Ein wichtiges Hilfsmittel 
ist der Einzelschritt-Simulator. 
Hierbei handelt es sich um ein 
Programm, das den Mikroprozes- 
sor vollständig simuliert. Man 
kann damit beliebige Maschinen- 
programme Schritt für Schritt ab- 
laufen lassen. Nach jedem Befehl 
werden die Register und Flags 
des Prozessors dargestellt. Auf 
Wunsch kann das untersuchte 
Programm auch im Schnellgang 
durchlaufen werden. Außerdem 
hat man die Wahl, Schreibzugriffe 
in den Speicher nur simulieren 
oder wirklich ausführen zu lassen. 
Ein Programm dieser Vielseitig- 
keit ist aber nicht nur für den As- 
semblerprofi von Nutzen. Wer 
noch nicht mit Maschinensprache 
vertraut ist, bekommt hier ein her- 
vorragendes Lernprogramm ge- 
boten. 


Normaler Befehlssatz 


und illegale Opcodes 
Den 


Der  Einzelschrittsimulator ist 
selbst in Maschinensprache ge- 
schrieben. Er beherrscht außer 
dem normalen Befehlssatz des 
6510-Prozessors noch die wichtig- 
sten illegalen Befehle. Wer diese 
Befehle noch nicht kennt, findet in 
Tabelle 1 eine kurze Zusammen- 
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Fehlersuche in Maschi- 
nenprogrammen ist 
kein Zuckerschlecken. 


Ein Einzelschritt- 


Simulator leistet dabei 


wertvolle Hilfe. 


fassung. Eine ausführliche Erklä- 
rung dieser Befehle gibt esin RUN 
2/85 und im ersten RUN-Sonder- 
heft. 
Beim Start des Simulators meldet 
er sich mit der Bildschirmmaske, 
die mit dem Inhalt aller Prozessor- 
register und Flags gefüllt ist: 

PC ACXR YR SR SP NV-BDIZC 
0000 00 00.00 20 FF 00100000 


Vierzehn Anzeigen 


Die Bedeutung der einzelnen An- 
zeigen: 
PC Programmzähler 
AC Akkumulator 
X-Register 
Y-Register 
SR Status-Register 
SP Stack Pointer = 
den Stapel 
N NegativFlag 
V  Overflow-Flag (Uberlauf-Flag) 
B Break-Flag 
D 
I 


Zeiger auf 


Dezimal-Mode-Flag 
Interrupt-Disable-Flag = Flag 
zum Sperren des Interrupts 
Z  Zero-Flag = Null-Flag 
C Carry-Flag = Bit 8 für Rech- 
nungen 
Der Einzelschritt-Simulator bietet 
folgende Möglichkeiten: 
l. Eingabe des Programmzählers 
2. Anderung der Registerinhalte 
3. Änderung der Flags 
4. Anderung von Speicherstellen 
5. Simulation der Befehle 
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6. Überspringen von Befehlen, 
7. Echtsimulation 
8. Schnelldurchlauf der Befehle 
(Simulation oder Überspringen) 
9. Abbruch des Simulators 
Hier die Beschreibung im Detail: 
l. Eingabe des Programmzählers 
Um dem Einzelschrittsimulator zu 
sagen, an welcher Stelle des Spei- 
chers sich das Programm befin- 
det, das. er simulieren soll, wird 
die Taste „P" (für Programmcoun- 
ter) gedrückt. Der Computer mel- 
detsich dann in der Mitte des Bild- 
schirms mit: 
PC? 0000 
Die Ziffern, die sich hinter. der Ab- 
frage befinden, sind die Vorgabe 
des momentanen Programmzäh- 
lerstandes. Durch Eingabe der 
hexadezimalen Adresse, an der 
der Prozessor fortfahren soll, wird 
der Wert in die Maske übernom- 
men. Gleichzeitig wird unter der 
Maske der nächste Befehl disas- 
sembliert dargestellt. 
Adresse Bytes Befehl 
8000 4C C1 84 JMP $84C1 
Bei indizierten, indirekt indizierten | 
und indiziert indirekten Speicher- 
befehlen wird hinter der disas- 
semblierten Zeile in eckigen 
Klammern die angesprochene 
Adresse und ihr Inhalt angezeigt. 
2. Änderung der Registerinhalte 
Ähnlich wie beim Programmzäh- 
ler können auch die Inhalte von 
Akku-, X-, Y-Register und vom 
Stackpointer eingegeben oder ge- 
ändert werden. Sobald der jewei- 
lige Anfangsbuchstabe gedrückt 
wird, erscheint in der Mitte des 
Bildschirms die Abfrage mit der 
Vorgabe des aktuellen Registerin- 
haltes. 
Beispiel: 
Es soll das X-Register auf $F3 ge- 
ändert werden: 
Taste „X" drücken. Es erscheint: 
XR? 35. 
Jetzt die Zahl eingeben und RE- 
TURN drücken. Bei einer Fehlein- 
gabe wird die Maske wieder auf- 
gebaut. Die dadurch gelöschte 
disassemblierte Zeile kann durch 


Eingabe von „P" RETURN neu dis- 
assembliert werden. 


3. Änderung der Flags 

Die Flags, die ganz rechts in der 
Maske dargestellt werden, lassen 
sich durch Tippen der Anfangs- 
buchstaben invertieren. Beispiel: 
Das Carry-Flag wird mit Taste „C" 
geändert. 


4. Änderung von Speicherstellen 
Mit dem Einzelschritt-Simulator 
kann man nicht nur Register und 
Flags, sondern auch Speicherstel- 
len anzeigen oder ändern. Zur An- 
zeige von Adressen wird die Taste 
„M" gedrückt. Es erscheint: 
Adresse: ?$* * x* * 

Nun gibt man die Adresse hexa- 
dezimal ein und drückt RETURN. 
Hinter der Eingabe wird der In- 
halt der Adresse angezeigt. Mit 
RETURN wird die Anzeige wieder 
ausgeblendet. Soll eine Adresse 
geändert werden, so muß zuerst 
auf Echtsimulation umgeschaltet 
werden. („E“ und „RETURN“ 
drücken), Jetzt kann! der angezeig- 
te Inhalt der Adresse überschrie- 


ben und mit RETURN übernom- 


men werden. 


5. Simulation der Befehle 

Die Simulation wird mit der Leer- 

taste ausgeführt. 

Beispiel: 

Der Programmzähler befindet 

sich an Adresse $8000 und folgen- 

de Anzeige ist auf dem Bildschirm: 
PC ACXR YRSR SP NV-BDIZC 

8000 00 00 00 20 .FF. 00100000 

8000 4C C1 84 JMP $84C1 


Nach dem Drücken der Leertaste 
wird der Befehl ausgeführt. Es er- 


scheint die Anzeige: 
PC ACXR YRSR SP NV-BDIZC 


840100 00 00 20 FF 00100000 


84C1A2 FF LDX #S$FF 


Man sieht, daß der Befehl wirklich 
ausgeführt wurde. Nun wird wie- 
- der die Space-Taste gedrückt: 

PC ACXR YRSR SP NV-BDIZC 
84C300 FF 00 20 FF 00100000 
84C3A9 00 LDA #300 
Im X-Register steht nach der Aus- 
führung $FF. 

Achtung: Trifft der Einzelschritt-Si- 
mulator auf den Befehl RTS, wäh- 
rend der Stapelzeiger $FF enthält 
(Wert beim Einsprung in dem Si- 
mulator), so wird ein Sprung zur 
Adresse $0000 ausgeführt und der 


‘der 


Stapelzeiger auf $01 gesetzt, da 


sich auf dem Stapel keine Rück- 


sprungadresse befindet. 
Auch der Befehl BRK wird simu- 
liert. Dabei wird zu der Adresse 
gesprungen, die in den Speicher- 
stellen 65534 und 65535 steht. 
Befehle, die in den Stapelbereich 
($0100-$01FF) schreiben. oder 
aus ihm lesen, werden nicht wirk- 
lich ausgeführt. Sie verwenden 
statt dessen den Stapelspeicher, 
der für den Einzelschritt-Simulator 
reserviert ist. 

6. Überspringen der Befehle 
Diese Möglichkeit sei am Beispiel 
Betriebssystemroutine ab 
Adresse $E50A erläutert. 
Anzeige: 

PC ACXR YRSR SP NV-BDIZC 
E50A00 FF 00 20 FF 00100000 
ES0ABO 07 BCS $E513 


Mit „C" wird das Carryflag gesetzt 
und mit der Leertaste der Befehle 
ausgeführt. 

Anzeige: 

PC ACXR YRSR SP NV-BDIZC 
E51300 FF 00 20 FF 00100001 
E5S13A6 D6 LDX $D6 
Mit der Taste CRSR DOWN kann 
dieser Befehl übersprungen wer- 
den. 

Anzeige: 

PC ACXR VRSR SP NV-BDIZC 
E51500 FF 00 20 FF 00100001 
E515A4 D3 LDY $D3 
Das X-Register wurde also nicht 
verändert, sondern nur der Pro- 
grammzähler erhöht. 

7. Echtsimulation 

Nach dem Start des Einzelschritt- 
Simulators werden Befehle, die 
den Inhalt einer Speicherzeile än- 
dern, nicht wirklich ausgeführt, 
sondern nur die Flags entspre- 
chend modifiziert. Man kann aber 
diese Befehle auch tatsächlich 
ausführen lassen. Dazu drückt 
man die Taste „E“. In der Mitte 
des Bildschirms erscheint nun fol- 
gende Abfrage: 

Echtsimulation ?]J 

Durch Drücken der Taste RE- 
TURN wird auf Echtsimulation um- 
geschaltet. Es werden jetzt auch 
die Schreibbefehle wirklich aus- 
geführt. 


‚Abgeschaltet wird dieser Modus 


durch Drücken der Taste „E“ und 


Eingabe von N RETURN. 


8. Schnelldurchlauf der Befehle 
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(Simulation oder Überspringen) 
Durch Drücken von SPACE zu- 
sammen mit der COMMODORE- 
Taste läuft die Simulation im 
Schnelldurchgang. Damit lassen 
sich zum Beispiel lange Schleifen 
beschleunigt abarbeiten. Beim 
Loslassen der beiden Tasten wird 
wieder auf Einzelschritt zurückge- 
schaltet. Es’kann auch im Schnell- 
durchlauf übersprungen werden. 
Dazu werden die Tasten COM- 
MODORE und CRSR DOWN 
gleichzeitig gedrückt. 

Der Schnelldurchlauf erspart sehr 
viel Zeit, sollte aber nicht während 
der Fehlersuche angewendet 
werden, da man dadurch leicht 
den Fehler übersieht. 

9. Abbruch des Simulators 

Der Einzelschritt-Simulator wird 
mit der RUN/STOP-Taste verlas- 
sen, kann aber auch bei einer Ein- 
gabeaufforderung mit * verlas- 
sen werden. i 


Erklärung zum 


Assemblerlisting 


Er ee 

8000 Sprung zum Start 
8003-80FB Bildschirmmaske 
80FC-8113 Ausgabe der 
schirmmaske 

8114-8123 Hexadezimalzahlen 
8124-8223 Tabelle der Zeiger auf 
die Zeigertabellen 

8224-82 A9 Tabelle der Zeiger auf 
die MNEMONICS-Simulations- 
Routinen 

82AA-83A9 Tabelle der Adressie- 
rungsarten zu den Opcodes 
83AA-8472 Tabelle der MNEMO- 
NIC-Strings 

8473-848C Tabelle der Zeiger auf 
die Aufgaberoutinen von X Leer- 
zeichen 

848D-84A6 Tabelle der Zeiger Et 
die Ausgaberoutinen zu den je- 
weiligen Adressierungsarten 
84A7-84C0 Tabelle der Zeiger auf 
die Berechnung des reellen Ope- 
randen 

84C1-84DD Variablen löschen 
84DE-85AD Bildschirmmaske, Re- 
gister und Flags ausgeben 
85AE-869B Gedrückte Taste aus- 
werten 

85C9 Rücksprung aus Simulator 
ins BASIC 
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Bild- 


869C Simulation ausführen 
869F-875A Eingabe der Register 
875B-8782 Eingaberoutine 
8783-87B7 Statusregister berech- 
nen 

87B8-87FD Stätusregister in die 
einzelnen Flags übertragen 
87FE-8818 Rücksprung aus Simu- 
lation: Festlegung der Flags 
8819-884A Befehl überspringen 
884B-8869 Adresse des Simula- 
tionsbefehls auf Stack legen 
886A-8CEA Programmroutinen 
zur Simulation der 6510-Befehle 
8CEB-8D91 Undefinierte Opcodes 
8D92-8DA4 Auf Verzweigung 
nach Branchbefehl prüfen 
8DA5-8DBE Auf Echtsimulation 
prüfen, wenn ja dann auf Stapel- 
bereich prüfen und abspeichern 
8DBF-8DDB Adresse des Pro- 
gramms auf Stapel legen, das den 
reellen Operanden berechnet. 
8DDC-8DEE Falls Adresse . im 
Stack dann Programm-Stack la- 
den 

8DEF-8EFF Durch verschiedene 
Adressierungsarten den reellen 


8F40-8F5E Indirekte Sprungadres- 
se berechnen 
8F5F-9036 Zeile disassemblieren 


Der Einzelschritt-Simulator ist 
ganz in Maschinensprache ge- 
schrieben und belegt den Spei- 
cherbereich von $8000 bis $9200. 
Er ist als kombinierter Hexdump- 
Basiclader abgedruckt (Listing ]). 
Wie man mit dieser Art Listing um- 
geht, steht auf Seite 6. Wird das 
Programm als Basiclader einge- 
geben, so muß vorher das Basic- 
Speicherende mit 

POKE 56, 127:CLR 

herabgesetzt werden. Nach dem 
Start mit RUN werden die Daten in 
den Speicher gepoket. Das fertige 
Maschinenprogramm kann mit 
POKE 483, 0:POKE 44, 128 

POKE 45,55:POKE 46,147 

SAVE "NAME" 8 

auf Diskette abgespeichert wer- 
den. 

Wird der Simulator als Hexdump 
eingegeben, so muß der Checker 
benutzt werden. Als Startadresse 
ist 8000 anzugeben. Der Einzel- 


sıo 


SPE Schiebe Speicher nach 


Befehl Beschreibung re 
ARX X-Register AND Akku 


mulator as 


Der. Ermniedrige echer a 
vergleiche mit Akkumu- 
_Iator 


ISC' Erhöhe Speicher und 
- ‚subtrahiere mit Carryflag. 
. vom Akkumülator 


var. ‘Lade Ekknmulater an | 


SEHE ‚Register mit Speicher i 


RLA Rotiere Speicher nach 
links AND Akkumulator “ 


RRA -Rotiere See nach 


 rechtsundaddieremit - 
 Carryflag zum z 
= "lator S 


ee n 
‚links OR Akkumulator ns 


rechts EOR Akkumulator S 


Operanden berechnen schrittsimulator wird mit sys 
8F00-8F3F Relative Sprungadres- 32768 gestartet. Tabelle 1: Grehebfassung der 
se berechnen (fürgen Zahn) EEE illegalen Opcodes der 6510. 


8900 18 DATA 4C,C1,84,93,81,20,20,20, DE | 8108 348 DATA F5,A9,F9,80,21,D8,A9,F6, 
8008 2® DRIR 20,20,20,36,35,31,30,20, FE | 8118 358 DATA 80,20,08,58,30.31,32,33. 
8010 32 DATA 45,49,4E,5A,45,4C,53,43, F9 | B118 368 DATA 34,35,36,37,38,39,41,42, 
Be 30 unIn aD SSuE shares. wo Size 20 Daln Haınalüsihs.an/esian sr 
228 60 DATA 29,20,20,20,20,20,20,20, 00 ges 35 er ne, 
8030 78 DATA 20,20,20,20,56,4F,4E,20, 35 8138 402 DATA 41,23,03,3F,0E,23.22 ar. 
8038 80 DATA 4A,55,45,52,47,45,4E,20, 18 B148 41B DATA 42,23,03,3F,1D0,02,00,30, ca 
Bo4O s0 DATA SA,41,48,4E,00,20,20,20, 00 | g148 420 DATA 07,02,28,30,27,02,28,00, 3D 
B04i8 100 DATA 20,20,20,C0,C0,C0,C0,C0, 68 | gı5o 430 DATA 07,02,28,30,08,02,00,30, 
8050 110 DATA C0,C0,C0,C0,C0,C0,C0,C0, 00 | gısa 440 DATA 41,02,28,30,20,02,22,3D0. aA 
80858 128 DATA C0,C0,C0,C0,C0,C0,C0,C0, 00 | 8180 _ 4sB DATA 42,02,28,30,2A,18,00,40, 
B060 130 DATA C0,C0,C0,C0,C0,C0,C0,00, B3 | B168 460 DAIA 41,18,21,40,24,18,21,00, 37 
8068 140 DATA 20,20,20,20,80,C0,C0,C0, FO | 8170 470 DATA 1C,18,21,49,0C,18,00,40, 9A 
B070 15® DATA CD,B2,C0,C0,C0,C0,C0,C0, BE | 8178 482 DATA 41,18,21,40,10,18,22,40, E4 
8078 168 DATA C9,C0,C0,C0,C0,C0,C0d,Co, 28 | 8180 490 DATA 42,18,21,40,2B,01,00,3E, F7 
8080 170 DATA C0,C0,B2,C0,C0,C0,C0,C0, F2 | 8188 500 DAIA 41,21,29,3E,26,01,29,00, 79 
B088 182 DATA C0,C0,C0,AE,00,20,20,20, FF | 8190 510 DATA 1C,801,29,3E,00,01,08,3E, D4 
8030 198 DATA 20,00,20,50,43,20,0D,20, F3 | 81938 528 DAIA 41,01,29,3E,2F,01,22,3E, 3D 
BeSB 200 DATA 41,43,20,58,52,20,59,52, FF | BIad S3® DAIR 42 ‚021,29,3E,00,30,41,39, 04 
Bord. 210 DATA 20,53,52,20,53,50,20,0D, 45 | B1AB 54@ DATA 32.38, 31,39,17,00,36,00. 47 
BORB 228 DATA 4E,S6,2D,42,44,49,54,43, FS | B1B0  5SSQ DAIn 32. 39,31,39,04,30,00,00, CF 
BOBO 238 DATA DD,00,20,20,20,20,00,20, 8C | 81B8 568 DATA 32,30,31,39,38,30,37,00, 39 
BOBB 24® DATA 20,20,20,00,20,20,20,20, 44 | BICD S7D DATA 08,30,00,00,20,1E,1F,3C, B6 
Boca 250 DATA 20,20,20,20,20,20,20,20, 020 | BICB SB0 DAIA 28,1E,1F,3C,34,1E,33,00, eE 
BECB 26B DATA 20,20,20,20,00,20,20,28, BD | 8100 S3D DAIA 29,1E,1F,3C,05,1E,00,3C, 31 
BED? 270 DATA 20,20,20,20,20,0D0,20,20, 31 | B1D8 608 DATA 20,1E,1F,3C,11,1E.35, 02, 2D 
BEDB 28D DATA 20,20,20,AD,C0,C0,C0,C0, 73 | 81EO 610 DaAIA 28. 1E,1F,3C,14,12,41,34A, 
BOEO 282 DATA B1,C0,C0,C0,C0,C0,C0,Co, Fi | B81EB8 6208 DAIA 14,12,15,3A,1B.12.16.00. 
BOEB 3080 DATA C0,C0,C0,C0,C0,C0,C0,C0, 88 | B1IFO 638 DAIA 14,12,15,3A,09,12,00,3A, .3B 
80oF@ 318 DATA C2,B1,C0,C0,C0,C0,C0,C0, BF | BIF8 6408 DATA 41,12,15,3n,0F ,12,22,30, EF s 
B0F8 320 DATA C2,C0,BD,08,A2,00,BD,03, 17 | 8208 650 DATA 42,12,15,3A,13,2C,41,3B, FB 
8100 330 DATA 80,F0,06,20,D2,FF,E8,D8, 61 | 8208 65698 DATA 13,2C,19,3B,1A,2C,22,00, D6 
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8210 
8218 
8220 
8228 
8230 
8238 
B240 
8248 
B250 
8258 
8260 
8268 
8270 
8278 
8280 
8288 
8230 
82398 
BenO 
B2nB 
B2B0 
B2B8 
B2c0 
82C8 
8200 
8208 
B2EO 
B2EB 
B2FO 
B2FB 
8390 
8308 
8310 
8318 
8320 
8328 
8330 
8338 
8340 
8348 
8350 
8358 
8360 
8368 
8370 
8378 
8380 
8388 
83390 
8398 
830 
B3RB 
8380 
8388 
83C0 
83C8 
8300 
8308 
83EO 
83EB 
B3F® 
B3FB 
8400 
8408 
8410 
8418 
8420 
8428 
8430 
8438 
8440 
8448 
8450 
B45B 
8460 


670 
688 
638 
700 
710 
720 
738 
748 
758 
768 
778 
788 
7908 
890 
810 
828 
838 
840 
858 
868 
870 
21217] 
830 
eleln) 
918 
928 
3382 
342 
9350 
368 
9370 
980 
338 


1990 
1018 
1228 
1039 
1942 
1958 
1868 
1970 
1888 
19098 
1108 
111® 
1128 
1138 
1140 
1150 
1168 
1170 
1188 
1198 
1208 
1218 
12208 
12308 
1248 
1250 
1260 
1270 
1280 
1290 
13088 
1318 
1328 
1330 
1348 
1358 
1368 
1370 
1388 
1390 
1490 
1410 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


13,2C,19,3B,86,2C,00,3B, 
435 ec, 19, 3B, ZE, eC,22,3B, 


42,2C,19,3B,19,88,6A,88, 


BB,88,CA,88,17.89,22.88. 
2B,89,34,89,63,89,6C,89, 
77,89,82,89,D4,89,DF,88, 
E8,83,F0,89,F8,89,00,8A, 
08,8A,38,BA,41,8A,4A,BA, 
SB,8A,61,8N,67,BA,76,8n, 
Al,BA,AD,BA,BS,BA,C7,BA, 
F7,8A,03,8B,0F,8B,1B,8B, 
4D,8B,50,8B,5F,8B,6E,8B, 
80,8B,8F,8B,A1,8B,09,8B, 


085,8C,14,8C,2C,8C,7D,8C, 
85,8C,80,8C,35,8C,A3,8BC, 
AC,8C,BS,8C,BE,8C,C7,8C, 
D®,8C,D93,8C,E2,8C,EB,8C, 


FF,8C,10,8D.21,80,30,8D. 
47,8D,5E,80,72,80,86,8D, 
8C,8D,21,0B,01,04,03,03, 
03,03,01,02,04,01,905,05, 


85,05,0C,0AR,01,20B,03,06, 
86,06,01,89,01,09,05,08, 
28, 28, 85, 0B,21,0B,03, e3, 
03,03,01,22,04,01,05,05, 


05,05,0C,0R.01,0R.03.06. 
06,06,01,09,01,29,05,08, 
08,28,81,0B,01,0B,03,23, 
03,03,01,02,04,01,05,05, 


085,05,0C,0A,01,0A,03,06, 


86,06,01,09,01,09,05, 28, 


08, 08,021, ‚OB, e1, ‚aB ‚83,83, 
23,03,01,02,04,01,0D,85, 


0S,05,0C.0n.01.0R.03.08. 
06,06,21,09,21,09,05,08, 
08,08,21,08,03,0B,03,03, 
03,23,01,21,01,901,05,05, 
05,05,0C,02A,01,21,06,06, 
27,07,21,093,21,01,01,08, 
01,01,02,0B,02,20B,03,03, 
83,03,21,02,01,01,05,05S, 
25,05,0C,0A,01,0A,06,06, 
07,027,01,09,01,01,08,08, 
093,03,02,0B,83,0B,03,03, 
03,03,01,82,01,901,05,05S, 


05,05,0C,0R,01,0A,03,06, 
06,206,01,089,01,09,05,08, 
08,08,02,0B,03,0B,03,03, 


03,03,01,02,01,01,05,05, 
05, 05, ec, on, ol, On, 03, 06, 


06,06,01,09,01,09,05,08, 


08,08,3F.3F .aF 41.44.43. 
41,4E,44,41,53,4C,42,43, 


43,42,43,53,42,45,51,42, 


49,54,42,4D,49,42,4E,45, 
42,50, 4C, #0, 02,.4B, y2, 56, 


43,42,556,53,43,40,43,43, 


4C,44,43,4C.49,43.4C.56, 
43,4D,50,43,50,58,43,50, 


53,44,45,493,44,45,58,44, 
45,59,45,4F,52,49,4E,43, 
49,4E,58,49,4E,59,4A,4D, 
sp,4HA, ‚53, SERACSHRLHT, ‘4C, 


44,58,4C,44,59.40.53.52. 
4E,4F,50,4F,52,41,50,48, 
41,50,48,50,50,4C,41,50, 
4C,50,52,4F,4C0,52,4F,52, 
S2,54,49,52,54,53,53,42, 
43,53,49,13,53,45, 434,53, 
45,49,53,54,41,53,54,58, 
53,34,58, 54,491 ,58754 477 
59,94,93, 58254 .58,41,57, 
58,93,97,59,93,49774317587 
24,49,90,44:,93:43. 36-477 
20,50, 40, 42, 80,002741,3J9, 


\8468 


8470 
8478 
8480 
8488 
84399 
84938 
B4AD 
B4AB 
84BO 
84B8 
B4CD 
B4CB 
84D® 
84D8 
B4E® 
B4EB 
B4FO 
B4FB 
8500 
8508 
8519 
8518 
8520 
8528 
8530 
8538 
8540 
8548 
8558 
8558 
BS6O 
8568 
8570 
8578 
8588 
BSBB 
8538 
8598 
BSAD 
85AB 
85B9 
85BB 
8SCO 
85C8 
85D9 
85D8B 
BSEB 
85E8 
85SFO 
BSF8 
8698 
8608 
8610 
8618 
86208 
8628 
8630 
8638 
8640 
8648 
8650 
8658 
8668 
8668 
8670 
8678 
8680 
8688 
8639 
8638 
12121217) 
B6AB 
BEBO 
86B8 
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1429 
1430 
1448 
1450 
1468 
1479 
1488 
1498 
1590 
1518 
1520 
1530 
1549 
1550 
1569 
1570 
1588 
1598 
1698 
1610 
1628 
1638 
1648 
1658 
1668 
1679 
1688 
1632 
17922 
1718 
1728 
1738 
1748 
1758 
17698 
17798 
1789 
1738 
1888 
18198 
18228 
1838 
1849 
1858 
1868 
1878 
1888 
1890 
13088 
19319 
1920 
19398 
1948 
1950 
1960 
1979 
1988 
1990 
20008 
2018 
20208 
2038 
2048 
2050 
28560 
2078 DATA 
2088 DATA 
2032 DATA 
2108 DATA 
2118 DATA 
2128 DATA 
2138 DATA 
2149 DATA 
21598 DATA 
2168 DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


4C,4F,53,52,45,4E,4F,SQ, 
4E,4F,50,83,91,8E,31,BE, 
31,83,91,96,91,8E,91,8BE, 
931,96,91,96,91,8E,91,BE, 
91,8E,91,96,91,37,30,38, 
32,4E,30,51,98,5C,90,71, 
90,7E,930,8B,30,91,30,97, 
99,17,930,87,90,10,31,EF, 
80,F8,8D0,14,8E,2B,8E 34, 
BE,4E,8E,67,8E,80,8E ‚9£E, 
8E,BC,8E,E3,8E,00.8F.40. 
8F,A2,FF,A9,00,90,E7,93, 
CA,D®,FA.A9.00,A2,19.3D. 
E6,94,CA,D®,FA,85,8D,85, 
BE,AS,FF,8D,FB,34,20,FC, 
B2,A2,05,R0,05,18,20,Fo. 
FF,AS,80,85,8B,AS,8E,85. 
8C,20,3A,91,A9,1D,20,D2. 
FF,28,D2,FF,A9,00,85,8C. 
AD,FF,94,85,8B,20,52,91. 
A9,1D,20,D2,FF,AD,FE,s4, 
85,8B,20,52,91,A9,1D,20, 
D2,FF,AD,FD,94,85,88B,20. 
52,91,A9,1D,20,D2,FF,2®, 
83,87,AD,FC,94,85,8B,20, 
52,91,A49,1D,28,D2,FF,AD, 
FB,94,85,8B,20,52,31, 49. 
1D,20,D2,FF,20,D2,FF,AD 
FA,94,18,69.30.20,D2,FF' 
AD,F9,94,18,69,30,20,D2, 
FF,A9,31,20,D2,FF.AD.FB. 
94,18,69,30,20,D2,FF,AD, 
F7,94,18,69,30,20,D2,FF, 
AD,F6,94,18,69,30,20,D2, 
FF,AD,FS,94,18,69,30,20. 
D2,FF,AD,F4,94,18,69,30 
20,D2,FF,A9,00,20,D2,FF. 
A9,11,A2,95,20,D2,FF,Ca 
D®,FA,AS,20,A2,17,20.D02. 
FF,CA,DO,FA,A9,SD,n2,16, 
20,D2,FF,CA,DO,FA,AD.BD. 
02,29,02,00,06,A5,C5,C9, 
40,00, F3,AS,C5.C9.48. Fo. 
FA,AQ,00,84,C6,C9,3F,D0. 
12,A9,9A,20,D2,FF,A9,06. 
8D,21,00,A9,0E,8D,20,00, 
4C,86,E3,C9,3C,F®,23,cC8, 
29,F0,22,C9,0A,F0,21,C9, 
17,F0,28,C9,19,FQ,1F,Cc9, 
OD,FO,1E,C9,27,D0,1D,AD, 
FA,94,49,01,8D,FA,94 ,4C, 
E1,84,4C,9C,86,4C,9F,86, 
4C,D7,86,4C,F8,86,4C. 19, 
87,4C,3A,87,C9,1F,DO.0B, 
AD,F9,94,49,01,8D,F9,34, 
4C,E1,84,C9,1C,D0,0B,AD, 
F8,94,49,01,8D,F8,94.,4C, 
E1,84,C9,12,D0,0B,AD,F7, 
94,49,01,80,F7,34,4C El. 
84,C9,21,D0,0B,AD,F6,34, 
49,01,8D,F6,94.4C.E1.B4. 
C9,0C,D0,0B,AD,FS,94,49, 
81,80,F5,94,4C,E1,84,C9, 
14,D0,0B,AD,F4,34,49,91, 
8D,F4,94,4C,E1,84,09.07. 
D®,19,AD,EE,34,8D,F®,34. 
8D,F2,94,85,8D,AD.EF. 94) 
8D,F1,94,8D,F3,94,85,BE, 
4C,39,88,C9,24,08,03,4C, 
2F,92,C9,0E,D®,03,4C,AS, 
92,4C,AE,85,4C,4B,88,49, 
50,20,D2,FF,A9,43,20,D2, 
FF,A9,20,20,D2,FF,20,D2, 
FF,A5,80,85,8B,A5,BE,85, 
8C,20,34,31,A9,3D,A2,06, 


r 


’ 


’ 
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86C8 
B6D2 
86D8 
BGEO 
86E8 
BEFO 
86FB 
8708 
8708 
8710 
871B 
8720 


8730 
8738 
8740 
8748 
8750 
8758 
8760 
8768 
8770 
8778 
8780 
8788 
8790 
8798 
870 
B7AB 
8780 
87B8 
87C0 
87C8 
8700 
8708 
B7EO® 
87EB 
87FO 
87F8 
8800 
8808 
8810 
8818 
8820 
8828 
8830 
8838 
8840 
BB48 
8850 
8858 
8860 
8868 
' 8870 
8878 
8880 
8888 
88390 
8838 
BBRD 
BBRB 
88B0 
88B8 
Baco 
B8CB 
88D0 
8808 
BBEO 
BBEB 
BBFO 
BBFB 
8300 
8308 
8310 


8728. 


2188 
2198 
2200 
2210 
2220 
2238 
2240 
2258 
22608 
2270 
2282 
2238 
2388 
2310 
2328 
2338 
2348 
2350 
2368 
2370 
2388 
2398 
24008 
2418 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2528 
253® 
2548 
2558 
2568 
2570 
2588 
2599 
2608 
2610 
2620 
2630 
256408 
2650 
2669 
2670 
2688 
2690 
2708 
2710 
2720 
2730 
2740 
2750 
2760 
2778 
2780 
2730 
28082 
28610 
2828 
2830 
2840 
2850 
2868 
2870 
28808 
2838 
2308 
2318 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


£e0,D2,FF,CA,D®,FA,20,FD, 7D 


AB,20,AD,91,A5,8B,85,8D, BB 
AS,8C,85,8E,4C,29,88,#9, 
41,8D0,00,02,A49,43,8D,01, 
02,n9,00,8D,02,02,85,8C, 
AD,FF,94,85,8B,20,5B,87, 
AS,8B,8D,FF,34,4C,E1,84, 


AS,58,8D0,00,02,A9,52,8D 


’ 


01,02,A9,20,8D0,22,02,685, 
8C,AD,FE,34,85,8B,20,58B, 
87,AS,8B,8D,FE,34,4C,El, 
84,A9,59,8D,00,02,A9,52, 
8D0,01,02,A9,20,8D0,02,02, 
85,8C,AD,FD,94,85,8B,20, 


SB,87,AS,8B,8D,FD,S4,4C 
E1,84,A9,53,80D,00,02,A9 


’ 


’ 


50,80,01,02,A9,00,8D,02, 
02,85,8C,AD,FB,34,85,88, 
20,5B,87,A5,8B,80,FB,34, 
4C,E1,84,A2,00,BD,00,02, 
F0,06,20,D2,FF,E8,D0,F5, 
A9,20,20,02,FF,28,D2,FF, 
20,52,91,A2,04,A9,90,20, 
D2,FF,CA,D®,FA,20,FD,AB, 
4C,FB,91,A9,00,AE,FA,S4, 
F0,02,09,80,AE,F9,94, FD, 
02,09,40,09,20,AE,F8,34, 


F0,02,09,108,AE,F7,94,Fo, 
02,09,08,AE,F6,94,F90,02, 
03,04, AE,FS,34,F0,02,09, 
02,0D,F4,94,8D,FC,34,60, 
AE,FC,94,8A ‚eg, Bo. FO,02, 
A9,01,8D0,FA,34,8A,29,40, 
F0,02,A9,81,8D0,F9,94,Bn, 
29,10,F0,02,A9,01,8D,F8, 
34,8A,23,08,F0,02,A9,01, 
8D,F7,94,84,29,04,F0,02, 
AS, 01 ‚BD, F6, 34, BA,29,02, 
F0,02,A9,01,8D0,F5S,34,BA, 
29,01,8D,F4,94,60,AD,FF, 
34,29,80,F0,02,A9,01,8D, 
FA,S4,AD,FF,94,D98,05,r2, 
01,4C,16,88,A2,00,8E,F5, 
94, AE,EC,94,E8,8A,18 ‚65, 
80,85,8D0,A5,8E,69,00,85, 
BE,AS,8E,8D,F1,94,8D,F3, 
94,A5,8D,8D,Fo,S94, 8D,F2, 
34,A9,13,20,D2,FF,nB, 28, 
A2,08,20,F0,FF ‚e®d,5SF,BF, 
4C,E1,84,A9,00,8D,EC, 37, 
AB,00,B1,8D,AA,BD,24, 81, 
BOA,AA,BD,24,82,38,E3,01, 
AB,BD,25S, B2, ES, 20, ‚48, SB) 
48, 60, AD, F7 ‚s4, FB, 03, 4c) 
AAR,BB,20,BF,8D,AD,F4,94, 
F0,22,38,24,18,AD,FF,S4, 
6D,EA,S4,8D,FF,94,790,03, 
AI,800,2C,A9,01,8D0,F9,94, 
BO,03, As, 00,2C,A3,01,BD, 
F4,94,AD,FF,934,30,83,49, 
088,2C,A9,21,8D,FA,394,4C, 
FE,87,20,BF,8D,AD,F4,94, 
F0,022,38,24,18,29,F2,32, 


4C,86,88,20,BF,BD.AD.FF. 
S4,2D,EA,94,BD,FF,S4,4C, 
FE,87,A0,00,B1,8D,AA,BD, 
AA,82,C9,04,D®,11,AD,FF, 
94,0A,BD,FF,34,30,02,n®, 
01,8C,F4,94,4C,FE,87,20, 
BF,8D,0E,EA,34,390,05,AD, 
01,2C,A0,00,8C,F4,94,20, 


AS,BD,AD,EA,394,390,05,A®, 
80,2C,AB,01,BC,FA,S4,AD, 
EA, S4,F®, ‚es, AD, 0D, eC,AB, 
01,8C,F5,94,4C,19,88,AD, 


12 
Ay 
C6 


2328 
2338 
23948 
23958 
2968 
2370 
2380 
2990 
3088 
32818 
3828 
3039 
3049 
3058 
3068 
3978 
3988 
3838 
3198 
3118 
3120 
3138 
3140 
3158 
3168 
3170 
3188 
3199 
3298 
3218 
3220 
3238 


3240° 


3250 
3268 
3270 
3288 
3299 
3388 
331® 
3328 
3338 
3348 
3359 
3368 


3378 
3388 
3398 
3408 
3410 
3420 
3430 
3442 
3450 
3460 
3478 
3488 


3490 


3528 
3518 
3528 
3538 
3548 
3550 


3568 
3578 
3588 
3599 
3688 
3618 
3628 
3638 
3648 
3659 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


F4,94,49,01,8D,E8,34,4C, 95 
92,8D,AD,F4,94,8D,E8,34, 
4C,92,8D,AD,F5,34,80,E8, A® 
94,4C,92,8D,20,BF,8D,AD, BE 
ER,S4,30,03,A0,00,2C,A®, AE 
01,8C,FA,34,29,40,F0,03, Bi 
AB,21,2C,AB,00,8C,F3,94, 
AD,FF,34,2D,EA,34,F0,03, 57 
AB,08,2C,A8,201,8C,F5,94, 02 
4C,19,88,AD,FA,S4,8BD,EB, 
34,4C,92,8D,AD,FS,934,49, 50 
01,80,E8,34,4C,92,8D,AD, 62 
FA,94,49,21,80,E8,94,4C, 9B 
32,8D,A9,02,18,65,8D,85, 


8D,AS,BE,69,00,85,8E,50 
0D0,A5,80,38,E9,02,85,8D 
AS,BE,ES,80,85,8E,AE,FB 
94,AS,BE,3D,E7,93,CA,A5 
80,9D,E7,93,CE,FB,94,CE 
FB,S4,CA,AD,FC,94,9D,E7 
33,CE,FB,94,A9,21,8D,F8 
94,BD,F6,94,20,83,87,AD 
FE,FF,85,8D,AD,FF,FF,85 
BE,4C,29,88,AD,F9,94,49 


’ 


’ 


01,8D0,E8,94,4C,92,8D,AD, 
FS,94,8D,E8,94,4C,92,88, 


AS,008,8D0,F4,94,40,19,88, 
AS,00,8D0,F7,94,4C,19,88, 
AI,00,80,F6,94,4C,19, BB, 
A9,00,80,F9,94,4C,19,88, 


19 


04 


18 


57 
C6 


19 
16 


20.BF,8D.AD.FF.S4.CD.ER. BF 
94,30,03,A2,00,2C,n2,01, 


BE,FA,S4,CD,EA,S4,F0,03, 
A2,00,2C,A2,01,BE,FS,94, 
CD,EA,S4,B0,03,A2,00,2C, 
A2,01,8E,F4,94,4C,19,88, 


20,BF,8D,AD,FE.94,4C.0E. 


8A,28,BF,8D,AD,FD,S4,4C, 
OE,8A,20,BF,8D,CE,EA,S4, 
AD,EA,94,85,8B,20,A5,8D, 
4C,84,8A, CE, FE,IS, SC, AG, 
BA,CE,FD,S4,4C,B8,8BA,20, 


BF,8D,AD,FF.94.4D,En. 94. 
8D,FF,S4,4C,FE,87,20,BF, 
8D,EE,EA,394,AD,EA,94,85, 
8B,20,A5,8D,AD,EA,34,30, 
03,A2,00,2C,AP,01,8E,FA, 
94,AD,EA,S4,F0,03,A2,00, 
2C,A2,01,8E,F5,94,40,19, 
88,EE,FE,S4,AE,FE,34,8E, 
ER,94,4C,84,8A,EE,FD,94, 
AC,FD,S4,8C,ER,94,4C,84, 
BA,20,BF,8D.AS.A7,85. 80, 
AS,AB,85,8E,4C,29,88,#5, 
8D,18,69,02,85,8B,A5,8E, 
69,00,85,8C,AE,FB,34,A5, 
8C,3D,E7,33,CA,A5,8B,3D, 
E7,93,CE,FB,34,CE,FB,94, 
AB,01,B1,8D,AN,CB,B1,80, 
86,80,85,8E,4C,29,88,2®, 
BF,8D,AD,EA,34,8D,FF,94, 
4C,FE,87,20,BF,BD,AD,En, 
94,8D,FE,34,4C,A4,8A,20, 
BF,8D,AD,ER,94,8D,FD,94, 
4C,B®,8R,n0,00,B1,8D,An, 
BD,AA,82,C9,04,D0,10,4E, 
FF,S4,90,03,A9,01,2C,9, 
02,80,F4,94,4C,FE,87,20, 
BF,8D,4E,EA,94,90,03,#9, 
01,2C,A9,20,80,F4,94,20, 
AS,8D,4C,84,84,4C,19,88, 
20,BF,8D,AD,FF,34,0D,Ea, 
94,8D,FF,394,4C,FE,87,RE, 
FB,34,AD,FF,34,3D,E7,33, 


114 un 


Sonderheft 2 
WUUEHOMPEONPUTERWORLD COM 


a Da m 


3A 
=] 
[#]%) 
FD 
14 
EA 
Sr: 
FB 
DS 
96 
e2B 
2C 
AE 
C7 


AA 
6A 
CB 
92 
BA 
23 
DS 
91 
FA 
EB 
04 
56 
Ehe: 
c8 
7B 


.57 


AA 
83 
65 


BS 
c3 
22 
83 
FS 
BB 
AF 
DO 
93 
1217) 


CE,FB,34,4C,19,88,20,83, 
87,AD,FC,S4,AE,FB,S4,SD, 
E7,93,CE,FB,94,4C,19,88, 
EE,FB,S4,AE,FB,94,BD,E7, 
33,8D,FF,94,4C,FE,87,EE, 


AS,8B,A0,00,931,47,60,A0, 63 
02,81,8D,AA,BD,AA,82,0R, BE 
38,E9,02,AA,BD,A7,84,38, OA 
ES,01,AR8,BD,AB,84,E9,00, DF 
48,98,48,60,A6,AB,CA,FO, 70 


FB,S4,AE,FB,S4,BD,E7,93, 


8D,FC,34,20,B8,87,4C,19, 
88,A0,80,B1,8D,AA,BD,AR, 
82,C9,04, Do, 0C,20,FC, BB, 
SE,FF,94,20,F1,8B,4C,FE, 
87,20,BF,8D,20,FC,8B,2E, 
EA,9S4,20,F1,8B,AD,EA,S4, 
85,8B,20,A5,8D0,4C,84,8BA, 
AD,00,B1,8D,AA,BD,AA,8B2, 
C9,04,D0, 03, eB,FC, BB, GE, 
FF,S4,4C,B3,8B,20,BF,8D, 
208,FC, SB, 6GE,EA,S4,4C,C2, 
BB,939,03,A9,01,2C,A9,00, 
BD,F4,94,68,AD,F4,94,F®, 


02,38,24,18.60.EE,FB.34. 
AE,FB,S4,BD,E7,93,8D,FC, 
94,20,B8,87,AE,FB,34,EB, 
BD,E7,33,85,8D,E8,BD,E7, 
33,85,8E,EE,FB,54,EE,FB, 


34,4C,19,88,AD,F7,S4,F®, 
03,4C,6C,8C,20,BF,8D,AD, 
RAS QUE Fo, v2, 38, 24,18, AD, 
FF,94,ED,EA,94,8D,FF,S4, 
70,03,A9,00,2C,A9,01,8D, 
F3,94,99,03,A9,01,2C,A9, 
02,8D,F4,94,AD,FF,S4, 30, 
03,A3,80,2C,A9,01,8D, FA, 
94,4C,FE,87,28,BF,8D, AD, 
F4,34,F0,02,38,24,18, 20, 
FE,92,4C,48,8C,A9,01,8D, 
F4,94,40,19,88, AS, 1, ‚8D, 
F7, 34, 4c, 19, BB, As, ‚@1ı, ED, 
F6,34,40,19,88,28,BF,8D, 
AD,FF,94, 85, 8B,20,AS,BD, 
4C,19,88,280,BF,BD,AD,FE, 


34,4C,9B,8C,20.BF.BD.AD. 
FD,94,4C,9B,8C,AD,FF,S4, 
8D,FE,S4,4C,A4,BA,AD,FF, 
94,8D,FD,94,4C,B0,8A,AD, 
FB,94,8D,FE,34,4C,A4,Ba, 
AD,FE,34,8D,FF,34,4C,FE, 
87,AD,FE,94,8D,FB,S94,4C, 
19,88,AD,FD,94,8D,FF,S4, 
4C,FE,87,20,BF,8D,AD,FF, 
94,2D,FE,34,85,8B,20,#5, 
8D0,8D,EA,94,4C,84,8A,20, 
BF,8D,CE,EA,94,AD,EA,S4, 
85,8B,20,AS,8D,4C,08,Bn, 
20,BF,BD,EE,EA,S4,AD,En, 
94,85,8B,20,A5,8D,4C,2C, 
8C,20,BF,8D,AD,EA,S4,8D, 
FF,94,8D,FE,94,4C,FE,87, 
20,BF,80,20,FC,8B,2E,En, 
94,20,F1,8B,AD,EA,S94,85, 
8B,20,A5,8D,4C,BB,88,20, 
BF,80,20,FC,8B,6E,EA,94, 
20,F1,8B,AD,EA,94,85,8B, 
20,A5,8D,4C,6A,88,20,BF, 
8D,BE,ER,34,20,F1,8B,AD, 
EA,94,85,8B,20,A5,8D,4C, 
50,8B,20,BF,8D,4E,EA,S4, 
20,F1,8B,AD,EA,34,85,8B, 
20,A5,8D,4C,67,8A,20,BF, 
8D,4C,19,88,20,BF,8D,4C, 
19,88,AD,E8,34,D0,08,#9, 
01,8D,EC,34,4C,19,88,20, 
00,BF,4C,23,88,A6,AB,E®, 
01,D0,08,A6,A7,AS,8B,9D, 
E7,93,60,AD,E7,94,F0,06, 


WWW HOMESOCMPUTERWORED-EOM 


03,A0,00,60,A6,A7,BD,E7, 
33,8D,EA,34,AB,21,60,n9, 
00,85,R7,85,AB,4C,DC,8D, 
AS,8D,18,69,01,85,A7,#AS, 
8E,69,00,85,A8,A0,00,81, 
A7,8D,EA,S4,A9,01,8D,EC, 
S4,4C,DC,8D0,A0,20,84,AB, 
C8,B1,80,85,A7,88,B1,A7, 
8D,EA,S4,A9,01,80,EC,94, 


4C,DC,8D0,A9,80,85,A7,85, 
AB,4C,DC,8D0,AB,01,B1, eD, 
85, A7, C8,B1,80,85,AB,n®, 
80,B1,A7,8D,EA,S4,A2,02, 
BE,EC, 34, HG, DC, 8D,AQ,01, 
81,8D,18,6D,FE,34,85,A7, 


88,84,AB,B1,A7.BD.ER. 34. 
C8,8C,EC,S4,4C,DC,BD,AD, 


81,51,8D0,18,6D,FD,94,85, 
A7,88,84,A8,B1,A7,BD,EA, 
94,C8,8C,EC,34,4C,DC,8D, 
AB,01,B1,8D,18,6D,FE,S34, 
85,A47,C8,B1,BD, 63, 00,85, 
AB,8C,EC,34,A8,00,B1,A7, 
8D0,EA,S4,4C,DE,8D0,A8,01, 
B1,8D,18,6D,FD,94,85,97, 
C8,B1,8D0,69,28, 85, AB,BC, 
EC,S4,AQ0,88,B1,A7,80D,EA 
34 ,4C.DC,8D0,AB.01.B1l.8D 
AA,BS,020,A8B,E8,B5,00,85 
AB.38,18,60,FD,94,85,A7 


e) 


A9,00,A8,65,A8,85,A8,Bl, 
A7,8D,EA,934,C8,8C,EC,S4, 
4C,DE,8D0,AB,21,B1,8D,18, 
6D,FE,S4,AA,B5S,00,85,n7, 
BS,01,85,A8,8C,EC,34,88, 
B1,A7,8D,EA,34,4C,DC,8D, 
A2,01,B1,80,30,192,18,69, 


282,65,8D0,85,8D,AS,00,65, 
BE,85,BE,4C,37,8F,49, FF, 
18,69,81,85,A9,A5,8D,38, 
ES,A9,85,A9,A5S,8E,E9,00, 
85,AA,AS,A9S,18,69,02,85, 
8D0,AS,AA,69,00,85,8E,A9, 
00,85,47,85,A8B,4C,DC,8D, 
AB,01,B1,80,85,A9,C8,B1, 


ED,85,AA.AD.00.B1.Ag.Bs. 
A7,C8,B1,A9,85,A8,88,B1, 
A7,8D,EA,S4,4C,DC,80D,A9g, 


20,20,D2,FF,AD,F®,94,8D, 
EE,94,85,8B,AD,F1,94,8D, 
EF,934,85,8C,20,3A,91,#9, 
20,20,D02,FF,AD,EE,94,85, 


AS,AD,EF.S4,85.AA.AD.00. 


B1,A9,85,8B,84,86,20,52, 
91,A9,20,20,D2,FF,A9,BrF, 
38,E9,01,AA,Ag, BF, E9,02, 
48,8A,48,A6,8B,86,8F,BD, 
AAN,82,0R,38,E9,02,A8,B9, 
73,84,38,E3,01,AA,B9,74, 
84,E9,00,48,8A,4B,60 ‚Ag, 
20,20,D2,FF,A6,8F,BD, e4, 
81,85,A9,0A,18,65,#9, AB, 
A2,03,8B9,AA,83,20,D2,FF, 
C8,CA,DO,F6,A9,20,20, D2, 
FF,AS,88,38,E9,01,AA,As, 
S2,E3,20,48,BA,4B,A6, BF, 
BD,AA,82,0N,38,E9,02; AB, 
BS, BD, ‚B4, 38, Eg, er, AA,BS, 
8E,84,E3,00,48,8A,48,50, 


Sonderheft 2&um 115 


9008 
3210 
9018 
3020 
EPEI: 
9030 
3038 
9040 
9048 
3050 
3058 
9060 
3068 
9078 
3078 
9080 
3088 
9032 
3038 
3OAD 
gOAB 
9080 
90B8 
90C0 
SOCB 
3000 
3008 
SEO 
9DEB 
gOro 
gOFB 
9100 
9108 
9110 
gı118 
gı20 
gı28 
3130 
9138 
g140 
9148 
9150 
3158 
9160 
3168 
9170 
9178 
9180 
3188 
9190 
9198 
gıAd 
S1AB 
9180 
gıBB 
gı1CDd 
gıcB 
9100 
3108 
g1EO 
g1EB 
S1FO 


5148 
5158 
5168 
5178 
5180 
5198 
52908 
5s21® 
5228 
5238 
5248 
5259 
5268 
5270 
5288 
5239 
5398 
5318 
5329 
5338 
5340 
5358 
5368 
5378 
5380 
5398 
5498 
5419 
S42D8 
5430 
5440 
5450 
S460 
5478 
5480 
5439 
5508 
5518 
5528 
5530 
554D 
5558 
5568 
5570 
5588 
5590 
5698 
5610 
5620 
5639 
5649 
5658 
5668 
5678 
5688 
56308 
5700 
5710 
5728 
5730 
5748 
5758 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


AB,8F,BD,AA,82,C9,06,90, 
07,C9,0C,F0,03,20,04,33, 
A2,12,R9,20,28,D2,FF,C#, 
D®O,FA,A9,00,20,D2,FF,AD, 12 
EE,94,69,81,8D,EE,94, AD, 
EF,94,69,00,8D,EF,34,60, 
A9,23,20,D2,FF,20,6B,31, 
AD,EE,94,C9,FF,D®,03,EE, 
EF,94,EE,EE,34,60,4C,3D, 
90,R9,20,20,D2,FF,AS,41, 
20,D2,FF,60,20,20,91,AD, 
EE,94,18,69,02,8D,EE,34, 
A9,08,6D,EF,34,8D,EF,34, 
60,20,30,30,A9,2C,20,D2, 
FF,A9,58,4C,D2,FF,20,3D, 18 
99,A9,2C,20,D2,FF,A9,59, 16 
4C,D2,FF,20,50,90,4C,74, 
90,20,5C,30,4C,81,30,#3, 
28,20,D02,FF,20,4E,30,49, 
29,20,D2,FF,4C,81,90,#9, 
28,20,D2,FF,20,4E,30,20, 1D 


5A 
B&E 
9B 


48 
36 
8c 
EF 
SE 
22 
D1 
D8 
88 
BB 


FD 
Ei 
34 
BE 


74,90,A9,29,4C,D2,FF,AD, 38 
EE,94,85,A9,AD,EF,34,85, .083 
AA,ADB,01,B1,49,85,8B,88, 81 
84,8C,A5,8B,380,12,18,69, DF 
02,60,EE,384,85,8B,AD,EF, A? 
94,69,00,85,8C,4C,05,91, SB 
49,FF,18,69,801,85,8B,AD, 54 


EE,94,38,ES,8B,85,8B,AD, 31 


EF,S4,E9,00,85,8C,85,8C, 35 
AS,8B,18,69,02,85,8B,A5, 2D 
8C,69,00,85,8C,19,24,20, 86 
D2,FF,20,3A,91,4C,40,90, AE 
A9,28,20,D2,FF,20,20,91, 3D 
A9,29,20,D2,FF,4C,5F,30, S® 
A9,24,20,D2,FF,AD,EE,S4, 7E 
85,A9,AD,EF,94,85,AA,AD, B3 
01,B1,49,85,8B,C8,B1,A9, 49 


B5,8C,A5,8C,4A,4A,4A,4a, 12 
AA,BD,14,81,20,D2,FF,#AS, 
8C,23,0F,AA,BD,14,81,20, 
D2,FF,AS,8B,4A,4n,4a,4n, 
An,BD,14,81,20,D2,FF,#AS, 
8B,23,0F,AA,BD,14,81,20, DI 
D2,FF,60,A9,24,20,D2,FF, 61 
AD,EE,34,85,49,AD,EF,S4, 
BS,AA,A®,01,B1,R9,85,8B, 
4C,52,91,n2,05,49,20,20, 
D2,FF,CA,DO,FA,60,20,78, 17 
91,A2,03,4C,85,91,20,70, 
91,A9,20,20,D2,FF,AD,EE, 
94,85,A9,AD,EF,34,85,AA, 41 


e3 
D2 
ED 
23 


e5 
7B 
46 


4B 
7A 


AD.@2,4C,7C,31,AD,00,02, 5® 
CS,2R,D0,03,4C,C3,85,R2, DI 
00,BD,00,02,10,00,D9,14, AB 
B1,F0,04,C8,C0,10,D0,F6, SD 
68,68,4C,DE,84,38,E0,00, 3A 
DD ,On,OA,OA,0n,0R,85S,8C, BE 
E8,4C,B3,91,E0,01,D0,08, 63 
05,8C,85,8C,E8,4C,B39,31, 36 
EO,02,00,0n,On,OA,0n,on, A3 
85,8B,E8,4C,B9,31,05,88, 38 


Listing 1: Kombinierter Hexdump-Basiclader des Simulators 


82208 
82008 
8002 UV 


I 


8808 ANF 


SWR 


; TEXT 


„OPT 


JMP 


ee 22202022 


8083 T 
BB16 
8027 


EXT 


‚ASC 
‚ASC 
.BYT 


$8200 
P4 
53248 


START ; ZUM START 


"23 6518 EINZEL” 
"SCHRITT-SIMULATOR” 
13 


116 QUW Sonderheft 2 
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DATA 85,8B,60,AD,28,022,C9,2A, 4A 
DATA D0,23,4C,C9,85,A2,00,BD, 76 
DATA 88,02,A0,88,09,14,81,F@, F3 
DATA 0A,C8B,C0,10,D0,F6,68,68, CC 
DATA 4C,DE,84,38,E0,00,00,0R, FF 
DATA BA,DA,DA,0A,BS,B8B,E8B,4C, 36 
DATA 07,92,05,8B,85,BB,60,AP, AB 
DATA 88,BD,C7,32,28,D2,FF,EB, DE 
DATA E®,16,02,F5,28,FD,AB,22,- 53 
DATA AD,S1,A9S,91,280,D2,FF,AS, DB 
DATA 1D,A2,14,280,D2,FF,CA,D®, 3C 
DATA FA,AS,8B,85,A7,A5,BC,85, 684 
DATA AB,29,0C,80,88,F0,06,C8, AD 
DATA B1,8B,8D,EA,S4,AD,EA,S4, ®6 
DATA 85,8B,A9,00,85,8C,20,52, 6A 
DATA 91,A2,04,A9,9D,20,D2,FF, 9A 
DATA CA,DO,FA,20,FD,AB,20,FB, 4A 
DATA 91,20,A5,80,49,91,20,D2, EF 
DATA FF,A2,1D,A9,20,20,D2,FF, A4 
DATA CA,D®B,FA,A5S,A7,CS,8D,F®, CE 
DATA 03,4C,E1,84,A5,AB,C5,AB, BE 
DATA D2,F7,4C,29,88,A2,200,BD, 26 
DATA DD,92,28,D2,FF,EB,E®,15, 7B 
DATA D®O,FS,20,FD,AB,AD,2028,022, FC 
DATA CS,4A,F0,03,A9,00,2C,A9, S6 
DATA 01,8D,E7,94,4C,E1,84,41, 76 
DATA 44,52.45,53,53,45,3A,28, BC 
DATA 20,20, 24,2A,2A,2A,2A,SD, 87 
DATA SD,3D,9D,9D,9D,45,43,48, 53 
DATA 54,53,49,4D,55,4C,41,54, F3 
DATA 49,4F,4E,20,20,20,4A,9D, DS 
DATA 3SD,SD,AD,FF,S4,F8,6D,EA, CE 
DATA 94,D8,8D0,FF,94,60,AD,FF, 2C 
DATA 94,F8,ED,EA,94,D8,8D,FF, EA 
DATA 34,60,20,BF,8D,A9,20,20, 7A 
DATA D2,FF,20,D2,FF,A9,5B,20, B3 
DATA D2,FF,AS,A7,85,8BB,A5,A8, CB 
DATA 85,8C,20,3A,91,A9,3D,20, E4 
DATA D2,FF,AD,EA,S4,85,8B,28, 18 
DATA 52,91,A93,5D,4C,D2,FF,20, 86 
FOR A-32768 TO 37689 STEP 4247 
8:5=®:C=®:FOR B=® TO 7: 

GOSUB 69048 

S=S5+H+L-C:0=S> 255: 5=-255-5 5034 
AND 255: POKE A+B,H+L:NEXT 
B:GOSUB 60948 

F$S="PRUEFSUMME OK”: IF S<> 5633 
H+L THEN F$="CRUS] 
PRUEFSUMMENFEHLER”: F=F+1 

GOSUB 698399: NEXT A:PRINT ” 2267 
CDOWNI”F”FEHLER”: END 

READ H$:G60SUB 659059: H-=L* 2715 
16:H$=MIDS CH$,2) 

L=ASC CHS+”X”)-4B: IF L<® 3198 
DR L>22 THEN 69989 

IF L<1® THEN RETURN 1044 
L=L-7:IF L>9 THEN RETURN 1334 
FS="LRUSIEINGABEFEHLER”:L= 24568 
0:F=F+1 

PRINT "ZEILE” PEEK (64)* 2726 


ESSE+PEEK (63)F$: RETURN - 


. VON JUER” 
"GEN ZAHN” 
13 


13 


I PC I AC.XR YR”" 


. 


.ASCE ” SR SP. INU-BDIZC I" -WOR LDEC 
‚BYTI 13 -WOR LDEX 

„ASC «WOR LDEY 

„ASC «WOR LEOR 

.BYT -WOR LINC 

„ASC R -WOR LINX 

„ASC «WOR LINY 

„BYT -WOR LJMP 

PL 5 22 -WOR LJISR 
;PRINT- TEXT -WOR LLDA 
;euus» -WOR LLDX 
BSOUT = sFFD2 «WOR LLDY 
PRTEXT LDX #0 -WOR LLSR 
GETOUT LDA TEXT,X / -WOR LNDP 
BEQ STARTI «WOR LORA 

JSR BSOUT «WOR LPHA 

INX -WOR LPHP 

BNE GETOUT -WOR LPLA 

START1 LDA #249 «WOR LPLP 
STA 11+33 -WOR LROL 

LDA #246 -WOR LROR 

STA UI+32 «WOR LRTI 

RIS «WOR LRITS 

LE Sen -WOR LSBC 
;HEXADEZ IMALZAHLEN .WOR LSEC 


BET Tr -WOR LSED 
HEXA ‚ASC "812345678SABCDEF" «WOR LSEI 


zen «WOR LSTA 


;OPERAND «-WOR LSTX 


sn... 


.UOR LSTY 
OPER .BYT 11,35,0,63,65,35,3,63 ‚WOR LTAX 
‚BYT 37,35,3,0,66,35,3,63 ‚WOR LTAY 
‚BYT 10,35,0,63,65,35,3,63 ‚WOR LISX 
‚BYT 14,35,34,63,66,35,3,63 ‚WOR LTXA 
.BYT 29,2,0,61,7,2,40,61.38 ‚OR LIXS 
‚BYT 2,40,0.7,2,40.61.8,2,0 “WORSEING 
‚BYT 61,65,2,40,61,45,2,34 «WDR LAAX 
‚BYT 61,66,2,40,61,42,24,0 ‚WOR LDCP 
‚BYT 64,65, 24,33,64,365, 24 «WOR -LISC 
‚BYT 33,0,28,24,33,64,,12,24 .WOR LLAX 
.BYT 0,64,65,24,33,.64.16.24 -WOR JERLA 
‚BYT 34,64,66,24,33,64,43,1 .WOR LRRA 
.BYT 0,62,65,1,41,62,38,1 ‚OR LSLO 
.‚BYT 41,0,28,1,41,62,13.1,0 ‚WOR LSRE 
.BYT 62,65,1,41,62,47,1.34 „MORSENORE 
.BYT 62,66,1,41,62,0,48.65 ERSLUeFe 
‚BYT 57,58 7,23,0,5 nn 

!BvT 0,50.u0 4arar 4Eaa0 ni ;ADRESSIERUNGSART 
.BYT 50,48,49,57,56,48,55.0 gi 

‚BYT 0,48,0,0,32,30.31.60 ADART «BYT 
.‚BYT 32,30,31,60,52.30.51,0 ‚BYT 
.BYT 32,30,31,60,5,30,0,68 «BYT 
.BYT 32,30,31,60,17,30,53,0 ‚BYT 
.‚BYT 32,30,31,60,20,18,65 „BYT 
.‚BYT 58,20,18,21,58,27,18 ‚BYT 
.BYT 22,0,20,18,21,58,9,18 ‚BYT 
.BYT 0,58,65,18,21,58.15,18 ‚BYT 
‚BYT 34,58,66,18,21,58,19 „BYT 
‚BYT 44,65,59,19,44.25.59 «BYT 
‚BYT 26,44,34,0,19,44,25,59 «BYT 
.BYT 6,44,0,59,65,44,25,59 .BYT 
‚BYT 46,44, 34,59, 66,44, 25 ‚BYT 
‚BYT 59 «BYE 
zz... „BYT 


; ADRESSEN .BYT 
zemuuem .‚BYT 
ADRESSE .WOR „BYT 
.WOR .BYT 
.WOR .BYT 
.WOR .BYT 
. VOR .BYT 
.WOR -BYT 
.WOR .BYT 
.WOR zr..... - 
.WOR ;MNEMONICS 
.WOR z..... 
‚„WOR 3 MNE ‚ASC "PPFADCANDASLECCBES” 
.WOR .ASCE "BEOBITBNIBNEBPLBRK” 
.WOR ‚ASC "BUCBVSELCCLDELICLU” 
.WOR .ASE "EMPEPXCPYDECDEXDEY” 
.WOR -ASC "EORINEINXINYIMPJSR” 
.WOR .ASC "LDALDXLDYLSRNOPORA” 
.WOR .ASC "PHAPHPPLAPLPROLROR"” 
‚.WOR ‚ASC "RTIRTSSBESECSEDSEI” 
.WOR ‚ASC "STASTXSTYTAXTAYTSX” 
‚WOR .ASC "TXATXSTYAAAXDCPISC” 
"WOR .ASC "LAXRLARRASLOSRENDP" 


WPrWONW 
WrreW 

n- 
waruwungSwWm- Ww 


NDS 


n- - = - 
wunwwW- 
DSWurWwnewtß- 


SEE ERS LTE Re ER ee et 
Ne 


DNWDNIWWNSUNNNWNFPDPPNUFPDrUNW.EH 
murmursur- - 
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1 


‚ASC "NOP” 


Fhöuchisslaohgeänes 


;LEERZEICHEN 
elueinchncinel 
LEERZ ‚WOR ' 
.WOR 
.WOR 
„WOR 
‚WOR 
.WOR 
„WOR 
.WOR 
„WOR 
.WOR 
.WOR 
.WOR 
.WOR 


sun 


;PRINT ASSEMBLERTEXT 


Ph 
PRT .WOR 
.UOR 
.WOR 
«WOR 
.WOR 
«WOR 
.WOR 
.WOR 
.WOR 
-WOR 
.WOR 
‚WOR 
.WOR 


zeuunuu 


618 
Gı1 
G12 
613 


« ;OPERAND BERECHNEN 


BIT ET 
OPRB «WOR 
«WOR 
«WOR 
«WOR 
«WOR 
«WOR 
«WOR 
«WOR 
«WOR 
«WOR 
«WOR 
.WOR 
«WOR 
LIE IT 


; ASSEMBLERSTA 


sr... 


r 
[=] 
D 
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IMP 
LN 
2P 
AK 
ABS 
ZPX 
2PY 
ABSX 
ABSY 
INDY 
INDX 
REL 
IND 


RT 


E1=]:] 

SBD 

ANF + 81500 
sag 

sBF 
VAREND-1 
UAREND-2 
VAREND-3 
VAREND-4 
URREND-5 
VAREND-& 
VAREND-7 
VAREND-B 
VAREND-S 
VAREND-1@ 
VAREND-11 
VAREND-12 
VAREND-14 
VAREND-16 
VAREND-18 
VAREND-22 
VAREND-23 
VAREND-24 
VAREND-2S 
VAREND-28 


84CD 
B4CF 
84D2 
84D3 
84D5 
8407 
84D9 
84DBB 


B4DE 


B4DE, 


B4EI1 
84E3 
B4ES 
B4EE 
B4ES 
B4EB 
B4ED 
B4EF 
B4F1 
B4F4 
B4F6 
B4FS 
B4FC 
B4FE 
8508 
8503 
8505 
85028 
850A 
850D 
8512 
8512 
8515 
8517 
B51A 
851D 
851F 
8522 
8524 
8527 
B52A 
852D 
852F 
8532 
8534 
8537 
853A 
853C 
853F 
8541 
8544 
8547 
854A 
854B 
854D 
8550 
8553 
8554 
8556 
8553 
855B 
BSSE 
8561 
8562 
8564 
8567 
B56A 
856B 
856D 
8570 
8573 
8574 
8576 
8579 
857C 
857D 
857F 
8582 
8585 
8586 
8588 
858B 
858D 
853908 
8532 
8554 


CURSOR 
NPRT 
REG 


IT1 


#es 
ES-1,X 


VAL2 
PC 
PC+1 
#SFF 
SP 


SFFFO 
PRITEXT 
#5 

#5 


CURSOR 
PC 

A 
PC+1 
A+1 
UMREC 
*23 
BSOUT 
BSOUT 
#D 
A+1 
AC 

A 
PRINT 
“29 
BSOUT 
XR 

A 
PRINT 
„29 
BSOUT 
YR 

A 
PRINT 
„29 
BSOUT 
STATUS 
SR 

A 
PRINT 
#29 
BSOUT 
SP 


A 
PRINT 
"29 
BSOUT 
BSOUT 
N 


"48 
BSOUT 
U 


#48 
BSOUT 
#49 
BSOUT 
B 


#48 
BSOUT 
D 


#4B 
BSOUT 
I 


“48 
BSOUT 
zZ 


#4B 
BSOUT 


8597 
8598 
859A 
859C 
859E 
B5A1l 
BSA2 
B5A4 
B5AG 
BSAB 
BSAB 
8SAC 


BSAE 
85B1 
85B3 
8SBS 
85B7 
85B3 
85BB 
85BD 
BSBF 
8SC1 
85C3 
85C5 


. 8567 


85C9 
8SCB 
8SCE 
8508 
8503 
85D5 
85D8 
85DB 
85DD 
8SDF 
8SEl 
8SE3 
BSES 
85E7 
85E3 
8SEB 
BSED 
8SEF 
BSF1 
85F3 
B85FS 
85F7 
BSFA 
B8SFC 
85FF 
86092 
8605 
8628 
B60B 
B60E 
8611 
8614 
8616 
8618 
861B 
861D 
8620 
8623 
8625 
8627 
B62A 
B62C 
BE2F 
8632 
8634 
8635 
8633 
863B 
B63E 
8641 
8643 
8645 
BE48B 
BE4A 
B64D 
8658 
8652 
8654 
8657 


DEX 
BNE 
LDA 
LDX 
JSR 
DEX 
BNE 
LDA 
LDX 
JSR 
DEX 
BNE 


HDLEN 


LDA 
AND 
BNE 
LDA 
EMP 
BNE 
LDA 
EMP 
BEQ 
LDY 
STY 
cmP 
BNE 
LDA 
JSR 
LDA 
STA 
LDA 
STA 
JMP 
CMP 
BEQ 
CHP 
BEQ 
CHP 
BEQ 
CHP 
BEO 
CHP 
BEO 
cnPp 
BEO 
cnP 
BNE 
LDA 
EOR 
STA 
JMP 
JMP 
JmP 
JMP 
JMP 
JMP 
JMP 
CMP 
BNE 
LDA 
EOR 
STA 
JMP 
CMmP 
BNE 
LDA 
EDR 
STIA 
JMP 
CHP 
BNE 
LDA 
EOR 
STA 
JMP 
CMP 
BNE 
LDA 
EDR 
STA 
JMP 
EMP 
BNE 
LDA 
EOR 


8659 
86SC 
B865F 
8661 
8663 
BES6 
8668 
B866B 
B66E 
8670 
8672 
8675 
8678 
867B 
867D 
8680 
8683 
8686 
8688 
868B 
B68D 
B6BF 
8692 
8694 
8636 
8639 
86SC 
869F 
B6A1l 
B6A4 
B6AB 
B6A3 
B6AB 
B6RE 
B6B1 
86B3 
B6BS 
8687 
86B3 
B6BC 
B86BE 
86C0 
86C3 
86C4 
86C6 
B6C6 
B6C6 
86C3 
BECC 
86CE 
8609 
86D2 
B86D4 
8607 
8609 
860C 
B6DE 
86E1 
86E3 
86EB 
86EB 
B6EB 
86ED 
B6FO 
B6F2 
B6EFS 
B6FB 
86FA 
S6FD 
B6FF 
8702 
8704 
8797 
8709 
870C 
870E 
8711 
8713 
8716 
8719 
871B 
871E 
8728 
8723 
8725 
8728 


ARAl 


AA2 


AA3 


AA4 


AAS 
SIMUA 
PCOUA 


AAB 


BASIN 
ABSP 


AKKUA 


XREGA 


YREGA 


sım 


BSOUT 


PRINT 
A 


AC 
REG 
av” 
ABSP 


872A 
8720 
872F 
8732 
8734 
8737 
873A 
873C 
873F 
8741 
8744 
8746 
8749 
874B 
874E 
8750 
8753 
8755 
8758 


875B 
875D 
8760 
8762 
8765 
8766 
8768 
876A 
876D 
8770 
8773 
8775 
8777 
877A 
877B 
8770 
8788 


8783 
8785 
8788 
87BA 
878C 
878F 
8791 
8793 
8735 
8738 
879A 
87SC 
879F 
B7A1l 
87A3 
87A6 
87AB 
B7AA 
87AD 
B7AF 
87B1 
87B4 
87B7 


87B8 
87BB 
87BC 
87BE 
87C® 
87C2 
87C5 
87C6 
87CB 
87CA 
87CC 
87CF 
87D8 
B7nD2 
87D4 
87D6 
8703 
87DA 
870C 


STACA 


; -....». 
‚..... 
i 


PRINTI 
NPREN 


PREN 


INP2 


‚eseses 


;STATUSREGISTER BERECHNEN 


STATUS 


nol 


No2 


N03 


NO4 


NOS 


NOS 


‚rusesse 


LDA 
SIA 
JSR 
LDA 
STA 
JMP 
LDA 
STA 
LDA 
STA 
LDA 
sIa 
sIa 
LDA 
sIa 
JSR 
LDA 
STA 
JNP 


LDX 
LDA 
BEO 
JSR 
INX 
BNE 
LDA 
JSR 
JSR 
JSR 
LDX 
LDA 
JSR 
DEX 
BNE 
JSR 
JMP 


LDA 
LDX 
BEO 
ORA 
LDX 
BEO 
ORA 
ORA 
LDX 
BED 
ORA 
LDX 
BEO 
ORA 
LDX 
BEOQ 
DRA 
LDX 
BEQO 
DORA 
ORA 
sTIa 
RTS 


YR 

A 
PRINT1 
A 


PRINTI 
A 


SP 
REG 


17) 
ABSP,X 
PREN 
BSOUT 


NPREN 
#32 
BSOUT 
BSOUT 
PRINT 
"4 
"m 
BSOUT 


INP2 
BASIN 
END1 


“2 


NO4 
"8 
I 


“4 
2 
NOS 
"2 
G 
SR 


;FLAGS BERECHNEN 


BEREC 


ZER1 


ZER2 


ZER3 


LDX 
TXA 
AND 
BEO 
LDA 
STA 
IxA 
AND 
BEQ 
LDA 
STA 
TXA 
AND 
BEO 
LDA 
sTa 
TxAa 
AND 
BEQO 


SR 


WWW ‚HOMELDNPEUTERWORLB. COM 


87DE 
87EO 
87E3 
87E4 
B7EE 
87E8 
B7EA 
87ED 
B7EE 
87Fo 
87F2 
87F4 
87F7 
87F8 
B87FA 
87FD 
B7FE 
8801 
8803 
8805 
8807 
880A 
8800 
8B0F 
8811 
8814 
8816 
8819 
BB1C 
881D 
BB1E 
8B1F 
8821 
8823 
8825 
8827 
8829 
8828 
BB2E 
8831 
8833 
8836 
8839 
883B 
883E 
8840 
8842 
8845 
8848 


B84B 
884D 
8850 
8852 
8854 
8855 
8858 
8853 
885A 
885D 
8BSE 
8860 
8861 
8864 
BBE&E 
8867 
8868 
8863 


8B6A 
B8B6D 
BB6F 
8872 
8875 
8878 
887A 
887B 
8897C 
887D 
8889 
8883 
8886 


LDA 
ZER4 sTAa 
TXA 
AND 
BEO 
LDA 
ZERS STA 
TXA 


AND - 


BEQ 
LDA 
ZER& STA 
TXxA 
AND 
STA 
RTS 
L1 LDA 
AND 
BEO 
LDA 
ZER? STA 
LDA 
BNE 
LDX 
JMP 
ZERB LDX 
ZERS STX 
PROG LDX 
INX 
TXA 
ELC 
ADC 
STA 
LDA 
ADC 
STA 
OUT LDA 
STA 
STA 
LDA 
STA 
STA 
NOT LDA 
JSR 
LDY 
LDX 
JSR 
JSR 
JMP 


;SIMULATION 
;sssese 

sım LDA 
STA 

LDY 

LDA 

TAX 

LDA 

ASL 

TAX 

LDA 

SEC 

SBC 

TAY 

LDA 

SBC 

PHA 

TYA 

PHA 

RTS 


;MNEMONICS 
‚esusue 
LADC LDA 
BEO 
JMP 
Yy2 JSR 
LDA 
BEO 
SEC 
.BYT 
BB3 CLC 
LDA 
ADC 
SIA 
BBB BUS 


17) 

L 

#0 

CPCI,Y 
OPER,X 
ADRESSE, X 
#1 


ADRESSE+1,X 
#0 


>» 
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BRANCH 


2 

#1 

FL 
BRANCH 


N 

#1 

FL 
BRANCH 


CPC),Y 


ADART,X 
#4 
L2ASL 

c 


STATUS 
65534 
PC 
65535 
PC+1 
OUT 


u 


BRANCH 1 


c 
FL 


BRANCH FL 


BRANCH 
#8 


& 
PROG 


#0 

D 
PROG 
#0 
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zum 
BABS LJMP 
BABC 
BABE 
BACO 
BAC2 
BACH 


BAC7 
BACS 
BACA 
BACC 
BACE 
BADO 
BaD2 
BAD4 
BAD? 
Bang 
Ban h CPC),Y 
BanE a es 
BAES sp 

BAEB #1 
BAER CPCI,Y 
BAEC 

BAED 

BREE CPC),Y 
BAF® PC 
BAF2 PC+1 
BAF4 DUT 


BAF7 OPERH 
BAFA 
BAFD 
8B08 


8803 
au CPC)I,Y 
8809 


8BoC 


ADART,X 


BBOF 
BB12 
8B15 
8B18 


8B1B 
8B1D 
BBlF 
BB22 
8B23 
BB25 
8B27 
B8B2A 
BB2C 
BB2E 
8B2F 
8531 
8B34 
8537 
8B3A 
8B3D 
BB3F 
BB41 
BB42 
BB44 
8B47 
BB4A 


8B4D 


8BS5® 
8B53 
BBS6& 
8B53 
BBSC 


BB5SF 
BB6E2 
BBES 
BBEB 
BBEB 


BBGE STATUS 
8B71 SR 
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AND - LDA A 
STA \ LDY #0 
JSR STA LADI,Y 
sTIA RETI RTS 
JMP sn. 

;DPERAND BERECHNEN 
JSR zemnmes Fr 
DEC OPERH LDY #8 
LDA EDATICPREITSY 
STA TAX 
JSR ; LDA ADART,X 
JMP ASL A 
SEC 
JSR SBC #2 
INC TAX 
LDA LDA OPRB,X 
sSTa SEC 
JSR sec #1 
JHMP TAY 
LDA OPRB+1,X 
JSR SEC #0 
LDA PHA 
STA Iya 
STAa PHA 
JMP RTS 
' LDX 
JSR DEX 
JSR BEO 
ROL LDY 
JSR RTS 
LDA LDX 
sSIA LDA 
JSR STA 
JMP LDY 

RIS 


JSR 
JSR LDA 
ROR STA 
JSR STA 
LDA JmP 
STA LDA 
JSR ELC 
INP ADE 
STA 
JSR LDA 
ASL ADC 
JSR STA 
LDA LDY 
STA LDA 
JSR STA 
JHP LDA 
STA 
JSR JMP 
LSR LDY 
JSR STY 
LDA INY 
STA LDA 
JSR : STA 
JMP DEY 
;eum LDA 
LNOP2 JSR STA 
JnP LDA 
zur ; STA 
LNOP3 JSR JMP 
JMP LDA 
zessose STAa 
; BRANCH-BEFEHLE STA 
‚ss... JMP 
BRANCH LDA LDY 
BNE LDA CPC),Y 
LDA STA AD 
STA ! INY 
JNnP LDA 
HH1 JSR STa 
JMP LDY 
‚esse LDA, 
POKE LDX STA 
CPX 
BNE 
LDX 
LDA 
SIA CPCI,Y 
RIS 
LDA XR 
BEO AD 


122 RU Sonderheft 2 
WIEN HOMEEDNPUTERWORLB:EOM 


ELC BFAC SBC #82 NOTHI 
ADC BFAE Tay 
ADC BFAF LDA LEERZ,Y _ 63 
STA BFB2 SEC 64 
LDA BFB3 SEC #1 
ADC 8FBS TAX 
STA BFBE LDA LEER2+1,Y 
JMP BFBS SBC #0 
EOR BFBB PHA 
ELC BFBC TXA 
ADC 8FED PHA 
STA SFBE RIS 
LDA 8FBF RETURN LDA 
SEC BFC1 JSR 
SBC BFCH LDX 
STA BFCE LDA 
LDA BFC3 STA 
SBC BFCB ASL 
STA BFCC ELC 
LDA BFCD ADC 
ELE BFECF TAY 
ADC BFDO LDX 
STA 8FD2 LDA 
LDA BFDS JSR 
ADC BFDB INY 
STA 8FDS DEX 
LDA BFDA BNE 
STA SFDOC LDA 
STA 8FDE JSR 
JMP BFEI LDA #<RETURN2 
LDY BFE3 SEC 
LDA BFE4 SEC #1 
STA BFES TAX 
Iny BFE7, LDA #>RETURN2 
LDA BFES SBC #98 
SIA BFEB ; PHA 
LDy BFEC IxA 
LDA BFED PHA 
STA BFEE LDX J, 
INY BFFO LDA ADART,X 
LDA 8rFF3 ASL 
BFF4 SEC 
ze BFFS sSBC #2 
LDA BFF7 TAY 
STA BFF& LDA PRT,Y 
JMP BFFB SEC 
ze BFFC SEC #1 
;WEITERE BERECHNUNGEN BFFE zaX 
sah Sn a CZUS),Y 
CLR LDOA #32 A 
sp04 PHA 
JSR BSOUT Soos TXA 
LDA A+1 
9906 PHA 
sIÄA 3007 RIS A 
STA PRMI 
3888 RETURN2' LDX 5 
Bus S90A LDA ADART,X 42 
ER saaD CHP #6 
Bi SO0F BCC NOTPRINT 
un nie 2er ERESE 
gar Fan 9013 BEQ NOTPRINT 
9915 JSR PRINTAD 
LDA pP 9918 NOTPRINT LDX #18 
STA Zus LDA #32 
LDOA P+1 N 
SpıC ELRIE JSR BSOUT 
STA ZwS+1 SOlF - DEX 
VOR. ezus).v erenid ANEZSUURIE 
' gp22 LDOA #13 
STAA s224 JSR BSOUT 
STY A+ı 0857 LDA 
JSR PRINT 
LDA #32 Ben, sur 
ge2C STA 
JSR BSOUT 


El 2 LDA 
ep RSPEAUMN 9032 ADC 


so STA 
SEC #1 32 ‚e..... 
TAX A 


LDA #>RETURN ;ASSEMBLERTEXT DRUCKEN 


‚nn... 

SEC #0 A 

PHA 61 RTS 
TXA G2 LDA 
PHA JSR 
LDX A ul JSR 
SIX J u4 LDA 
LDA ADART,X EnP 
ASL BNE 
SEC INC 
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gı10 G13 
gı12 
9115 
9118 
gııa 
S11D 
9128 
sı22 
3125 
9128 
gı2A 
912D 
sı2F 
9131 
9133 
9135 
9136 
9138 
“g13A 
913C 
913D 
913E 
913F 
9148 
9141 
3144 
9147 
9149 
914B 
S14C 
gı4F 
9152 
9154 
9155 
9156 
9157 
9158 
9159 
g1Sc 
915F 
gı161 
9163 
9164 
9167 
g16A 
916B STRING 
g16D 
3170 LS 
9173 
9175 
9178 
917A 
sı7C 
917E 
91898 
9183 
9185 
9187 
g18A 
918B 
918D 
918E 
9131 
3193 
9196 
9193 
9198 
919E 
gırıl 
gıA3 
S1A6 
g1AB 
gıAA 


S1AD 
9182 
sıB2 
gıB4 
91B7 
31B3 
SıBC 
Sı1BE 
sıcı 
sıc3 


yrc® 
BSOUT 
STRI 
4er)» 
BSDUT 
US 
#5” 


(ZzuwS),Y 
A 


(ZWS),Y 
A+l 
Ari 


HEXA,X 
BSOUT 
A 

#15 


HEXA,X 
BSOUT 


Por 


Listing 2: Assemblerlisting des Simulators 
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FOUND 


FOUND2 


FOUND3 


FOUND4 


END1 


RECHI 
Jul 


VERGL1 


FOUNDS 


FOUNDS 


ADR 
uJ 


FOUNDS 


#16 
VERGLI 


NPRT 


REGIS 
TESTING 


D 
DECII 


; seen 


INY 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JSR 
LDX 
LDA 
JSR 
DEX 
BNE 
JSR. 
JSR 
JSR 
LDA 
JSR 
LDX 
LDA 
JSR 
DEX 
BNE 
LDA 
ENP 
BEO 
JMP 
LDA 
CMP 
BNE 
JMP 
LDX 
LDA 
JSR 
INX 
CPX 
BNE 
JSR 
LDA 
cHmP 
BEO 
LDA 
.BYT 
LDA 
STA 
JMP 
„ASC 
‚„ASC 
„ASC 
„ASC 
LDA 
SED 
ADC 
ELD 
STA 
RTS 
LDA 
SED 
SBC 
CLD 
STA 
RIS 


TESTING 
REG 
AD+1 
AD+1 
REGIS 
DUT 

117) 
TECHT,X 


"ADRESSE: Ei 
"rennt 
"ECHTSIMULATI" 
"ON Jana" 

ACc 

op 

AC 

AC 

op 


AC 


; ADRESSE MIT INHALT AUSGEBEN 


..... 


PRINTAD 


JSR 
LDA 
JSR 
JSR 
LDA 
JSR 
LDA 
STA 
LDA 
STA 
JSR 
LDA 
JSR 
LDA 
STA 
JSR 
LDA 
JMP 


OPERH 
gen 
BSOUT 
BSOUT 
RL 
BSOUT 
AD 

A 
AD+1 
A+l 
UMREC 
Hr=r 
BSOUT 
OP 

A 
PRINT 
Her 
BSOUT 


Basic- 


Erweiterung 


Basic hoch drei 


Basic-Power wie noch nie! Die 
Allround-Erweiterung .User-Basic 
möbelt den C64 auf, daß er nicht 
wiederzuerkennen ist. Alle As- 
pekte des Rechners werden ab- 
gedeckt durch: 
— Test- und Editierhilfen 
— Strukturbefehle 
— Ein- und Ausgabebefehle 
— Zahlen- und Stringbefehle 
— Kommandos für Lores- 
Hiresgrafik . 
— Sprite- und Soundbefehle 
— Befehle für die Floppy und für 
relative Files 
— Kommandos für den Userport 
User Basic ist voll ins Betriebssy- 
stem eingebunden. Alle Befehle 
werden platzsparend als 2-Byte- 
Token im Programm gespeichert 
und lassen sich bei der Eingabe 
abkürzen. Alle Parameter, die zu 
einem Befehl mit angegeben wer- 
den, können aus Funktionen. und/ 
oder Variablen bestehen (Zahlen 
und Strings). 

Zwei hochauflösende Grafikbild- 
schirme und vier unabhängige 
Textbildschirme stehen dem An- 
wender zur Verfügung. Zwischen 
den Schirmen kann mühelos hin- 
und hergewechselt werden. _ 
Im Direktmodus sind die Funk- 
tionstasten belegt. Änderungen 
sind mit dem Befehl KEY möglich. 
Trotz der vielen Lores-Bildschirme 
(4 KByte), zwei hochauflösenden 
Grafikseiten (16 KByte) und 11 
KByte Maschinen-Code bleiben 
30719 Basic-Bytes frei. 

Hier die Befehlsübersicht: 

Test- und Tool-Befehle 

AUTO Startzeile, Schrittweite 
Parameter: Startzeille 0-—65535, 
Schrittweite 1—255: Automatische 
Vorgabe der Zeilennummern. 
Werden nach AUTO keine Para- 
meter angegeben, sind die letzten 
Werte gültig (Bei Neustart 100 und 
10). 


und 


RENUM Anfangswert, Schritt- 
weite 
Parameter: Anfangswert=0— 


65535. Schrittweite=1—255. Ein 
Basic-Programm wird neu durch- 


User-Basic bricht alle 
Rekorde: 120 neue 


Befehle verdreifachen 


den mageren Wort- 
schatz des C'64. 


numeriert. Sprungadressen wer- 
den hierbei automatisch ange- 
paßt. 


DEL Startzeile, Endzeile 
Parameter: Startzeile=0—-65535, 
Endzeile=0—65535. Beispiel: 

DEL 10,9000 

Löscht aus einem Basic-Programm 
die Zeilen 10 bis 9000. 

DEL sollte nur im Direktmodus 
verwendet werden. Ein vorzeiti- 
ger Abbruch ist mit der STOP- 
Taste möglich. 


FIND Text 

Listet alle Zeilennummern, in de- 
nen „Text“ enthalten ist. Beispiel: 
FIND "ALLES KLAR“ 
FINDGOTOIO 


DUMP 

Alle nichtindizierten Variablen 
und ihre Werte werden gelistet. 
Beispiel: 

10 DEFFNAX)=X #2 

20 A=1:A%=2:A$= 
"TEST":2=FNA(Y) 

DUMP liefert: 

A! 

xX=0 

A] 

AN=2 

A$="TEST" 

Z=0 

'" markiert dabei eine definierte 
Funktion. 


OLD 

holt ein Programm zurück, das mit 
NEW gelöscht wurde. 

Wird das Programm durch einen 
Fehler oder durch Stop unterbro- 
chen, wird die aktuelle Zeile ge- 
listet. 
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Struktur-Befehle 

REPEAT. . .UNTIL Bedingung 
Führt eine Schleife zwischen RE- 
PEAT und UNTIL aus, bis die Be- 
dingung hinter UNTIL erfüllt ist. 
Beispiel: 

10 REPEAT 

20 1=1+1:PRINTI 

80 UNTIL I=100 

LABELtext 

Markierung einer Sprungadresse. 
CALLtext 

Sprung zu einer symbolischen 
Adresse. 

Zwischen LABEL und text sowie 
zwischen CALL und text dürfen 
keine Leerzeichen stehen. LABEL 
muß immer am Zeilenanfang ste- 
hen, weitere Befehle dürfen fol- 
gen. Beispiel: 

10 CALLSPRUNG] 

20 LABELOK1:STOP 

30 LABELOK2:STOP 

40 LABELSPRUNG] 

50 CALLOK2 

Programmablauf: 
10—40—50-—30--Stop 

DISPOSE RETURN 

DISPOSE NEXT I 

DISPOSE NEXT 

DISPOSE CLR 

Der DISPOSE-Befehl entfernt eine 
Struktur vom Stack. DISPOSE 
NEXT erlaubt einen vorzeitigen 
Sprung aus einer FOR-NEXT- 
Schleife. Wird dabei der Name 
der Schleifenvariable angegeben, 
so wird diese Schleife und alle in 
ihr enthaltenen gelöscht. Beispiel: 
10 FORI=0TO 10: FOR J=0 TO 10 
20 DISPOSE NEXT I 

löscht beide Schleifen aus dem 
Stack. 

DISPOSE RETURN beendet ein 
"GOSUB"-Unterprogramm 
Rücksprung. 

DISPOSE CLR beendet alle offe- 
nen FOR..TO..NEXT und alle GO- 
SUB-Unterprogrammebenen. So- 
mit ist ein direkter Rücksprung 
aus einem tief verschachtelten 
Programm möglich. 

RESET x 

setzt den DATA-Zeiger auf die Ba- 
sic-Zeile x. Bei RENUMBER erfolgt $ 
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ohne 


keine Anpassung der Zeilennum- 
mer, da bei RESET die Angabe ei- 
ner Variablen erlaubt ist. Beispiel: 
10 DATA 

20 DATA2 

30 RESET2O 

40 READA:PRINTA 

Befehle für Tastatur, Ein- und 
Ausgabe 

AGAIN x 

Parameter:x=0—1. x=1 schaltet 
alle Tasten auf Auto-Repeat; x=0 
schaltet in den Normalzustand zu- 
rück. 

NOKEY 

löscht den Tastaturbuffer (ent- 
spricht dem Basic-Befehl POKE 


198,0). 

KEY Nr., 'Text" 

KEY Nr., "Text" 
"KEY 


Parameter: Nr. =1—8, Text-Länge: 
höchstens 10 Zeichen. 

KEY ohne Parameter zeigt die Be- 
legung der Funktionstasten an. Sie 
kann mit KEY, Nr. der Funktions- 
taste, "Text" geändert werden. 
Wird nach dem "Text" ein - an- 
gehängt, wird der Befehl unmittel- 
bar nach Drücken der entspre- 
chenden Funktionstaste ausge- 
führt. 

FUNC 

Beispiel: 

lO REPEAT 

1lOA=FUNC _ 

20 UNTIL A=1 

Gibt die Nummer der gedrückten 
Funktionstaste an (0, wenn keine 
gedrückt). 

STAY 

Beispiel: 

10 A=STAY 

20 PRINT A 
Das Programm wartet in Zeile 10 
‚auf einen Tastendruck und über- 
gibt den ASCII-Code der ge- 
 drückten Taste an die Variable A. 
PRESS "String" 

Beispiel: 

10 A=PRESS'123* 

20 PRINT A 

Das Programm wartet in Zeile 10, 
bis eine der Tasten '1','2' oder '3' 
gedrückt wird, und übergibt de- 
ren ASCII-Code an die Variabl 
A. 
LINPUT "Text", A$,Länge 
LINPUT A$,Länge 

Parameter: Länge= 1—80. 
Entspricht dem INPUT-Befehl. Es 
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können jedoch beliebige Zeichen 
außer Cursortasten eingegeben 
werden, also auch ',' und ':'. 'Län- 


‚. ge’ bestimmt die maximale Einga- 


belänge. Das Eingabefeld wird 
mit Leerzeichen gefüllt. Bei Anga- 
be von "Text" wird dieser wie bei 
INPUT vor der Eingabe ausgege- 
ben. Als Cursor erscheint ein tief- 
gestellter waagrechter Strich. 
FETCH ‘erlaubte Zeichen“, Län- 
ge,A$ 

Parameter: Länge = 1—80 
entspricht dem INPUT-Befehl. Es 
können jedoch nur „erlaubte 
Zeichen" eingegeben werden. 


Waagerechter Strich 


als Cursor 
BF 


'Länge' bestimmt die maximale 
Anzahl von Zeichen. Die eingege- 
benen Zeichen werden in 'A$’ zu- 
rückgegeben. Wie bei LINPUT 
wird vor der Eingabe das Einga- 
befeld gelöscht (definiert durch 
'Länge'). Als Cursor erscheint ein 
waagrechter Strich in mittlerer 
Zeichenhöhe. 

CURSOR x 

Parameter: x=0—1 

x=1 schaltet den Cursor ein. 

x=0 schaltet den Cursor aus. 

Der Befehl hat nur während des 
Programmablaufs Wirkung. 

ROW 

COLUMN 

Beispiel: 

10 A=ROW 

20 B=COLUMN 

Die Variable A’enthält die momen- 
tane Cursorzeile. Die Variable B 
enthält die momentane Cuysor- 
spalte. 

CCOL 

ermittelt die aktuelle Cursorfarbe. 
Beispiel: 

10A=CCOL 

20 PRINT A 

TABLE : 

Der Bildschirm wird in 5 Spalten 
zu je 8 Zeichen unterteilt. TABLE 
positioniert auf die nächste Spalte. 
Beispiel: 


10 FOR I=1TO100 


20 PRINT I;: TABLE 
30 NEXT I 

AT (xz,y) Druckliste 
AT (x,y) 
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Parameter:x=0—-39, y=0—24 
Positionierung des Cursors in der 
Spalte x und Zeile y. Wird eine 
Druckliste angegeben, wirkt der 
AT-Befehl wie PRINT. Beispiel: 

10 AT (10,11)"Text“ : 
20 AT (10,12): INPUT A 

CENTRE 'text" 

gibt den String "text" in der aktu- 
ellen Zeile zentriert aus. 

OUT Text“ ,n,f 

Parameter: n=0—255, f=0—15. 
Der String „Text“ wird an der ak- 
tuellen Cursorposition mit der Ge- 
schwindigkeit 'n’ in der Farbe 'f' 
ausgegeben. Im Gegensatz zum 
PRINT-Befehl wird nach der Aus- 
gabe kein CR durchgeführt. 
SPACE n 

Parameter: n=1--255. Löscht ab 
Cursorposition n Zeichen, ohne 
die Position’des Cursors zu verän- 
dern. 

USING '###.#4#" A 

USING # in, , ##+#.#+#"\Ä 
Formatierte Ausgabe der Zahl A 
auf dem Bildschirm oder Drucker. 
Beispiel: 

10 USING" ## #.# #",10.3 

20 A$="HH 4.4 # 

30 USING A$, 11.54 

40 OPEN 4,4 

50 USING #4, "###.4##",12.3 
Zu beachten ist, daß bei der For- 
matierung das Vorzeichen mit be- 
rücksichtigt werden muß: 

Falsch: 


"USING" # # #.# #°,100.22 


Richtig: 

USING" # ## #.# #",100.22 
Befehle für Zahlen- und Stringbe- 
handlung: 

Zahlen können in Hexadezimal- 
und Binärschreibweise eingege- 
ben werden. Beispiel: 

PRINT 
$FFA2,$FD,%10010011,%110 
A=%01101:B=$FFA 

DOKE Speicheradresse, Wert 
Parameter: Speicheradresse =0— 
65535, Wert=0-—65535. Beispiel: 
10 DOKE 1024,455 

In die Speicherzelle 1024 wird das 
Lo-Byte von 455, in 1025 das Hi- 
Byte von 455 gepoket. 

DEEK (Speicheradresse) 


Parameter: Speicheradresse=0— 
65535. Beispiel: 


10 A=DEEK(1024) 
Umkehrung von DOKE. Liest aus 
der Speicherzelle 1024 das Lo- 


Byte und aus 1025 das Hi- Byte. 
MIN (Feldvariable) 
sucht den kleinsten Wert im ange- 
gebenen Feld. Beispiel: 
10 DATA5,3,8,8,3,2,10 
20 DIM A(6) 
30. FORI=0TO6:READAD:NEXTI 
40 B=MIN(A):PRINT B 
Ergebnis:2 
MAX (Feldvariable) 
sucht den größten Wert im ange- 
gebenen Feld. 
FRAC (n) 
"ermittelt den Nachkomma-Anteil 
einer Zahl. Beispiel: 
10 A= 10.34234 
20 PRINT FRAC(A) 
Ergebnis: ‚34234 
RAD (w) 
Parameter: w 0—65535 
Beispiel: 
10 A=RAD(234) 
Wandelt das Argument in Radian 
(entspricht A = 234 # PI/180). 
HEX$ (n) 
Parameter: n=0--65535. Beispiel: 
10 INPUT, Zahl";Z 
20 A$=HEX$(Z) 
30 PRINT A$ 
40 GOTO 10 
HEX$ ist eine Stringfunktion, die 
einen entsprechenden String in 
hexadezimaler Darstellung über- 
gibt. Bei 2< 256 ist der String zwei 
Zeichen, bei Z>255 vier Zeichen 
lang. 
SWAP (A$,B$) 
Der Inhalt von A$ und B$ wird ver- 
tauscht, ohne Stringmüll zu produ- 
zieren. 
SIZE n.c,X$ 
Parameter: n=0—255: Soll-Länge 
des Strings, c=0—255: Füllcode, 
X$: Stringvariable. Beispiel: 
10 A$="123" 
20 B$="" 
30 SIZE10,65,A$ 
40 SIZES,66,B$ 
50 SIZES,67,C$ 
Ergebnis: A$="123AAAAAAK', 
B$="BBBBB", C$="CCCCCc" 
Füllt einen String auf die Länge n 
mit dem ASCII-Code c. Ein 
STRING TOO LONG ERROR er- 
folgt, wenn LEN (X$)>n. Der Be- 
fehl bleibt ohne Wirkung, wenn 
. LENX$)=n. 
: PLACE (A$,B$,P) 
PLACE (A$,B$) 
Parameter: P= 1—255. Sucht B$ in- 
nerhalb A$ ab der Position P. 


Basic- 


Erweiterung 


Wird P nicht angegeben, wird ab 
Position 1 gesücht. Beispiel: 

10 A$="STRING' 

20 B$="TESTSTRING" 

30 A=PLACE(B$,A$,1) 
Ergebnis:A=5 


Textbildschirme auch 


unsichtbar 


Befehle für Lores-Grafik: 
SCREEN w 

Parameter: w=0—3. Es können 
bis zu vier Textbildschirme auch 
unsichtbar gespeichert werden. 
Der Parameter w bestimmt den 
sichtbaren Bildschirm. Alle Befeh- 
le wirken immer nur auf den sicht- 
baren Bildschirm. Bei einem Bild- 
schirmwechsel werden nur das 
Video-RAM sowie die Rahmen- 
und Hintergrundfarben gewech- 
selt. Alle vier Bildschirme haben 
einen gemeinsamen Farbspei- 
cher. Beispiel: 

10FORI=0TO3 

20 SCREENI 

30 PRINT "Das ist Bildschirm"I 

40 NEXTI 

SCRDEL 

löscht die drei unsichtbaren Bild- 
schirme. 

COLOR Rahmenfarbe, 
grundfarbe 
Parameter: Rahmenfarbe = 0—255, 
Hintergrundfarbe=0--255. Setzt 
die entsprechenden Farben. ° 
INK Farbe 

Parameter: Farbe=0-—-255. Setzt 
die aktuelle Oursorfarbe. 
ERASE Zeile 

Parameter: Zeile=0—24, Beispiel: 
10 ERASE 12 

löscht auf dem Bildschirm die an- 
gegebene Zeile. 

REVERS Zeile, Start, Ende 
Parameter: Zeile=0—24, Start= 
0—39, Ende=0—39, Beispiel: 

10 REVERS10,5,30 

invertiert die Zeichen in der Zeile 
10 ab Spalte 5 bis Spalte 30. 

FILL x1,y1,lx,ly, Code 

Parameter: x1=0—39, yl=0—24, 
1x=0—-39, Iy=0—24, Code=0-—- 
255, x1+lx maximal 39, yl+ly ma- 
ximal 24. Füllt den Bildschirm ab 
der Position x1/yl mit dem Poke- 
Code auf einer Breite von x Spal- 
ten und einer Tiefe von |y Zeilen. 


Hinter- 
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Beispiel: 

10 FILL 0,0,12,22,66 

PAINT x],yl,lx,ly‚ Farbcode 
Parameter entsprechend FILL, 
nur wird hier der Farbspeicher 
adressiert. 

PLOTH li 

Parameter: 1=0—320, f=0—15. 
Zeichnet ab Cursorposition einen 
waagrechten Balken der Länge 1 
in der Farbe f. Auflösung: maxi- 
mal 320 waagrechte Punkte. Bei- 
spiel: 

10 AT(0,10) 

20 FOR I=0T0320 

30 PLOTH I,0 

40 NEXTI 

PLOTVLf 

Parameter: 1=0—200, f=0—15. 
Zeichnet ab Cursorposition einen 
senkrechten Balken der Länge | 
und der Farbe f. Auflösung: 200 
senkrechte Punkte. 

SCROLL x! ,yl,ix,Iy,w;r 
Parameter:xl,yl,lx und ly wie bei 
FILL, w=0—1, r=0—3. Scrollen ei- 
nes Bildschirmausschnittes in eine 
beliebige Richtung. xl, yl, Ix und 
ly definieren das Scroll-Feld. 
w=1: Herausgeschobene Zeichen 
werden nachgeschoben. 

w=0: Leerzeichen werden nach- 
geschoben. 

r=0: Scrollen nach links 
r=1:Scrollen nach rechts 

r=2: Scrollen nach oben 

r=3: Scrollen nach unten 

Beispiel: 

10’ SCROLL10,10,20,5,1,3 

PUSH z1,z2 

Parameter: z]=0—24, z2=0-—24. 
Scrollt den Bildschirm von Zeile zl 
bis Zeile z2 nach oben. Bei z22>z]1 
hat der Befehl keine Wirkung, bei 
zl=z2 wird die Zeile gelöscht. 
REPLACE C1,C2 

Parameter: C1=0—255, C2= 
0—255. 

Ersetzt auf dem Bildschirm alle 
Zeichen mit dem Poke-Code Cl 
durch den Code C2. Beispiel: 

10 FOR I=1 TO 500:PRINT" AZ"; 
20 NEXTI 

30 PAUSE2O 

40 REPLACEI,2 
Alle "A“ werden durch "B" ersetzt. 
BLINK fl f2t 

Parameter: fl=0-15, f2=0—-15, 
t=1—255. Der Bildschirmrahmen 
wechselt ständig die Farbe zwi- 
schen fl und f2 nach der Zeitt. 
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NOBLINK 
beendet den BLINK-Befehl. 
FLASH fl f2,t 
Parameter: wie BLINK. Alle 
Zeichen auf dem Bildschirm mit 
dem Farbcode fl wechselt ständig 
die Farbe zwischen fl und f2. t be- 
stimmt die Frequenz des Farb- 
wechsels, 
NOFLASH 
beendet den Befehl FLASH. 
TURN fit 
‘ Parameter: f=0—15, t=1-—255, 
Alle Zeichen auf dem Bildschirm 
' mit dem Farbcode f werden im 
Takt t invertiert. 
TURNOFF 
-beendet den TURN-Befehl. 
COPY +#1fn 
Beispiel: 
10 OPEN1,4 
20 COPY #1 
. Der Text-Bildschirm wird über 
Geräteadresse 4 (Drucker) ausge- 
geben. 


Zwei Grafikseiten 
in Hires 


Befehle für Hires-Grafik: 

In User-Basic stehen zwei hochauf- 
lösende Grafikseiten zur Verfü- 
gung. Wie in der Lores-Grafik ha- 
ben beide Grafiken ein gemeinsa- 
mes Farb-RAM. Die sichtbare 
Grafikseite liegt immer im Bereich 
ab $E000. Bei einem Wechsel der 
Grafiken werden beide Seiten 
Byte für Byte vertauscht. Um im- 
mer einen definierten Ausgangs- 
zustand vor einem Programmstart 
zu erhalten, wird bei jeder Pro- 
grammunterbrechung die Grafik- 
seite | nach $E000 gelegt (wenn 
nicht bereits vorhanden). 

Bei einer Programmunterbre- 
chung während der Darstellung 
eines Hires-Bildes wird automa- 
tisch auf den normalen Textbild- 
schirm umgeschaltet. 

Bei den Hires-Befehlen wird ein 
Zeichentyp mit angegeben! 
Typ=0: zeichnen 

Typ=1: löschen 
Typ=2:invertieren 

Typ=3: strichpunktieren 

Bei den nachfolgenden Koordina- 
tenangaben' 'x,y" gelten als zuläs- 


Sonderheft 2 


Basic- 


Erweiterung 


| sige Werte für x 0—-319 und für y 


0—199. 

HIRES 

Der Computer schaltet auf Hires- 
Grafik. 

OFF 

Zurückschalten auf Lores-Grafik. 
CHANGE a 

a=(0: Grafik 1 ist sichtbar 

a=|: Grafik 2 ist sichtbar 

TRANS a 

a=(:; Unsichtbare Grafik wird in 
die sichtbare kopiert. 

a=1: Sichtbare Grafik wird in die 
unsichtbare kopiert. 

DESIGN a 

a=0: Zeichenbefehle (LINE, 
SET, ...) wirken auf sichtbare Gra- 
fik. 

a=l: Zeichenbefehle wirken auf 
unsichtbare Grafik. 

CLEAR a 

a=0: Sichtbare Grafik wird ge- 
löscht. 

a=1: Unsichtbare Grafik wird ge- 
löscht. 

INVa 

a=0; Sichtbare Grafik invertieren. 
a=1: Unsichtbare Grafik invertie- 
ren. 

PCOL {1, 2 

Parameter: fl=0—255, f2=0—255. 
Bestimmen der Farben: fl= Vor- 
dergrundfarbe, f2= Hintergrund- 
farbe. 

SET x,y,Typ 

Punkt an den Koordinaten x,y set- 
zen, löschen oder invertieren. 
TEST (x,y) 

Beispiel: 

10 A=TEST(259,120) 

Ist in der sichtbaren Grafik der 
Punkt mit den Koordinaten x,y ge- 
setzt, ist A=1, sonst A=0. 

LINE x],y1,x2,y2,Typ 

Linie zwischen den Koordinaten 
xl,yl und x2,y2 entsprechend 
dem Zeichentyp ziehen. 

FRAME x],y1,x2,y2,Typ 
Rechteck entsprechend dem Zei- 
chentyp zeichnen. 

BOX x1,y1,x2,y2,Typ 

Ausgefülltes Rechteck entspre- 
chend Zeichentyp zeichnen. 
CIRCLE x,y,Radius,Typ 
Parameter: Radius=1—180. Kreis 
zeichnen mit dem angegebenen 
Radius. Mittelpunkt ist x,y. 


ELLIPSE x y.ıx,ry, Typ 
Parameter: rx=1—180 (X—Radius), 
ry=1—-180 (Y-—Radius). Ellipse 
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zeichnen mit den angegebenen 
Parametern. 

VEKTOR x,y,Radius, Grad, Typ 
Parameter: Radius=0-—255, Grad 
0—65535. Radius ab Koordinate 
x,y zeichnen. Es erfolgt eine Feh- 
lermeldung, wenn die Endkoordi- 
naten den zulässigen Bereich 
überschreiten. 

TEXT x,y,"text"),s,n, Typ 

Schreibt den String "text" an der 
Position x,y in die Grafik. 

s=1: Zeichensatz | normal 

s=2: Zeichensatz l invers 

s=3: Zeichensatz 2 normal 

s=4: Zeichensatz 2 invers 

n=0: Original Commodore- 
Zeichen 

n=1: Kursivschrift 

DRAW x,y,"udlrUDLR",Typ 


Frei wählbare Kurve ab denKoor- 


dinaten x,y': zeichnen, wobei 
u=Cursor up, d=Cursor down, 
l=Cursor left und r=Cursor right. 
Werden die Steuerbuchstaben 
normal eingegeben, wird der Cur- 
sor bewegt und ein Punkt entspre- 
chend dem Zeichentyp gesetzt. 
Werden die Steuerbuchstaben 
geshiftet eingegeben, wird nur 
der Cursor bewegt. 

MIX n‚Zeilel ‚Zeile2 

Parameter: n=0—-l, Zeilel= 
0—255, Zeile2=0—255, Zeile 2 > 
Zeile 1. Mischt Textbildschirm mit 
Grafikbildschirm. : 

n=0: Grafikfenster im Textbild- 
schirm. 

n=1: Textfenster im Grafikbild- 
schirm. | 

MIXOFF 

schaltet MIX aus. Es wird auf nor- 
male Bildschirmdarstellung umge- 
schaltet. 

GRASV n,an,"Programmname" 
n=0; Sichtbare Grafik speichern. 
n=1: Unsichtbare Grafik spei- 
chern. 

gn= Gerätenummer 
GRALD n,gn,"Programmname" 
n=0: Gespeicherte Grafik in sicht- 
bare Seite laden.‘ 

n=1; Gespeicherte Grafik in un- 
sichtbare Seite laden. 

gn= Gerätenummer 

HCOPY +#Ifn,n 

lfn= logische Filenummer 

n=0: Hardcopy sichtbare Grafik 
n=1: Hardcopy unsichtbare Gra- 
fik 

Die Hardcopyroutine wurde für 


den Drucker Seikosha GP-100VC 
geschrieben. Der Befehl optimiert 
den Ausdruck durch Überprüfen 
auf Leerzeichen. 

Beispiel: 

10 OPEN4,4 

20 HCOPY #4,0 

30 CLOSE4 

Befehle für Sprites: 

CREATE Nr, Farbe, Block, Mo- 
dus, Priorität 

Die Parameter eines Sprites wer- 
den mit dem CREATE-Befehl defi- 
niert. Parameter: 

Nr=0—7: Spritenummer 
Farbe=0—255: Farbe des Sprites 
Block=0—255: Daten des Sprites 
aus Block *64 

Modus: O=einfarbige Darstellung, 
1=Multicolor-Sprite 

Priorität: O=Sprite vor Hinter- 
grund, l=Hintergrund vor Sprite. 
MULTI 1 f2 

Parameter: fl=0—15, f2=0-—-15. 
Die weiteren Farben der Multi- 
color-Sprites festlegen. 

EXTEND Nr x, y 

Parameter: Nr=0—-7: Nummer 
des Sprites 

x=0: normale-Größe in x-Richtung 
x=]: doppelte Größe in x-Rich- 
tung 

y=0: normale Größe in y-Richtung 
y=1: doppelte Größe in y-Rich- 
tung 
SPRITE Nr x 
SPRITE 
Parameter: 
des Sprites 
x=0—1: 0=Sprite aus, 
an. 

SPRITE ohne Parameterangabe 
schaltet alle Sprites aus, 

MOVE Nr.x,y 

Parameter: Nr=0—-7, x=0-512, 
y=0—255. Das Sprite mit der Num- 
mer Nr zur Position x,y bewegen. 
Sprites sollten nicht während der 
Anzeige eines Hires-Bildes einge- 
schaltet werden! 

Befehle für Sound: 

 VOLx N 

Parameter: x=0—15: Lautstärke 
festlegen 

WAVE st,w 

Parameter: st=1—3: Auswahl der 
drei Stimmen. w=0—3: Auswahl 
der Wellenform: 

. Q=Dreieck 

1=Sägezahn 

2=Rechteck 


Nr=0—-7: Nummer 


1=Sprite 
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3=Rauschen 

ENV st,a,d,s,r 

Parameter: st=1—3: Auswahl der 
Stimme, a=0—15: Attack, d=0— 


15:  Decay, s=0-15: Sustain, 
r=0-—15: Release. Hüllkurve einer 
Stimme definieren. 

PULS st,x 


Parameter: st=1-3, x=0-409. 
Der Parameter x bestimmt das 
Taktverhältnis der Stimme st (nur 


bei Rechteck). 

PLAY st it 

Parameter: st=1—3: Auswahl der 
Stimme, f=0-65535: Frequenz 


des Tones: t=0—255: Dauer des 
Tones in Yıo Sekunde. 
Floppy-Befehle: 

CATALOG 

Das Inhaltsverzeichnis einer Dis- 
kette wird ohne Programmverlust 
gelistet. 

DISK 

DISK "Anweisung" 

Eingabe von DISK liest den Feh- 
lerkanal der Floppy aus und zeigt 
ihn an. Folgt nach DISK eine An- 
weisung, wird diese über den 
Kommandokanal an die Floppy 
übermittelt. Wird der Befehl DISK 
"Anweisung" im Direktmodus ein- 
gegeben, wird anschließend auto- 
matisch der Floppy-Status ange- 
zeigt. Beispiel: 

10 DISK 

20 DISK "S:PROGRAMMNAME* 
STATUS x$ 

Wie bei DISK wird der Fehlerka- 
nal der Floppy ausgelesen. In der 
Variablen X$ wird der Text der 
Fehlermeldung übergeben. Bei- 
spiel: 

10 RECORD 111 

20 STATUS A$ 

30 PRINT A$ 

40 STATUS B$ 

50 PRINT B$ 


MERGE "Programmname“ 
Gerätenummer 

An ein im Speicher befindliches 
Programm wird das Programm 
„Programmname" angehängt. Bei- 
spiel: 

MERGE'“TEIL2",8 

DLOAD "Programmname" 
entspricht LOAD"Programmna- 
me",8,1. Es wird automatisch Ge- 
räteadresse 8 vorausgesetzt. Wie 
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beim normalen LOAD-Befehl wer- 
den hier die Pointer auf das Pro- 
grammende mitgesettzt. 

MLOAD "Programmname" 
entspricht ebenfalls LOAD"Pro- 
grammname'",8,1. Die Programm- 
pointer werden allerdings nicht 
verändert. MLOAD ist somit ideal 
als Ladebefehl für Maschinenpro- 
grammteile innerhalb eines 
Hauptprogramms geeignet. 

FAST 

beschleunigt den Floppy-Zugrift. 
SLOW 

normalisiert den Floppy-Zugriff. 
Befehle für relative Files: 
RELFILE #1fn,“name",rl 
Parameter: lfn 0—127 logische 
Filenummer, rl 1—255. Länge eines 


Datensatzes. Entspricht dem Ba- - 


sic-Befehl 

OPEN # 1fn,8,1,"Name,;L,", 
CHR$(T]). 

RECORD rm,p 

RECORD mn 

Parameter: m=0—65535, p=0—255. 


Record anpeilen 


Mit diesem Befehl kann auf einen 
bestimmten Record in einer relati- 
ven Datei positioniert werden. 
Weil beim C64 in Verbindung mit 
der Floppy 1541 nur ein relatives 
File geöffnet werden kann, ist eine 
Angabe der logischen File-Num- 
mer nicht nötig. ın bestimmt den 
Record, auf den positioniert wer- 
den soll. Der Parameter p ist optio- 
nal und bestimmt das Byte im Re- 
cord. Wird p nicht angegeben, 
wird auf Byte 0 positioniert. Bei- 
spiel: 

10 RELFILE#1,"Name",100 

20 RECORD200 

30 PRINT#1,CHR$ (255) 

Es werden eine relative Datei un- 
ter dem Namen "Name" mit einer 
Recordlänge von 100 Bytes eröff- 
net und 200 Records freigegeben. 
FILE #lfn.n,X$ 

Parameter: lfn: logische Filenum- 
mer, n=1—255: Anzahl der zu le- 
senden Bytes, X$ enthält den gele- 
senen Text. Aus einer Datei, die 
mit der logischen Filenummer Ifn 
eröffnet wurde, werden n Bytesin 


die Stringvariable X$ gelesen. So-> 
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mit können aus einer relativen Da- 
tei mit einem Befehl bis zu 255 
Zeichen gelesen werden. Bei- 
spiel: 

10 RELFILE #1,"Name", 100 

20 RECORD55 

30 FILE#1,10,A$ 

Ergebnis: 

zum Beispiel A$="123456789A" 
Hardware-Befehle: 

POT (w) 

liest den Wert eines Padddles 
aus, Parameter: w=1—4. 
w=]:Paddle 1 Port 1 

w=2: Paddle 2 Port | 

w=38: Paddle 1 Port 2 

w=4: Paddle 2 Port 2 

Beispiel: 

10 FORI=1TO4 

.20 PRINT POTT) 

30 NEXTI 

TPOT (w.2) 

ermittelt, ob sich der Wert des 
Paddles 2 innerhalb einer Zeit- 
spanne ändert. Parameter: 


w= 1-4: Paddlenummer 
t=0—255: Zeitspanne in Zehntel- 
sekunden. Beispiel: 

10 A=TPOT(2,10) 

" A=0, wenn gleich - 

A=], wenn größer 

A=-—-], wenn kleiner 

TIME "hhmmss",x,y 

Parameter: x=0—39, y=0—24. Die 
Echtzeituhr wird entsprechend 
“hhmmss" gestellt. x und y geben 
an, wo die Ausgabe auf dem Bild- 
schirm erfolgen soll. 


CLOCK 

Parameter: x=0—1 

x=1: Echtzeituhr wird auf dem 
Bildschirm eingeblendet. 

x=0: Echtzeituhr wird ausgeblen- 
det, läuft aber intern weiter. 
Beispiel: 

10 TIME'124530",10,10 

20 CLOCK1 

Bei Rechnern mit alten Betriebssy- 
stemen muß dafür gesorgt wer- 
den, daß der Farb-RAM für den 
Bereich der Uhrzeit immer gesetzt 
ist. 

Befehle für den Userport: 
INPORT (a,b....) 

Parameter: a,b,...=0—17. Beispiel: 
10 INPORT(0,1,2,3) 

Die Datenleitungen 0,1,2 und 3am 
Userport werden auf Eingang ge- 
schaltet. Es kann eine beliebige 
Anzahl der Parameter a,b, ... in- 
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nerhalb der Klammer angegeben 
werden. 

OUTPORT (a,b...) 

Wie INPORT, nur werden die Da- 
tenleitungen auf Ausgang gelegt. 


Userport anzeigen 


CHECK (a,b....) 

Beispiel: 

10 A=CHECK(0,1,2) 

Es wird überprüft, ob die Bits 0,1 
und 2 am Userport gesetzt sind. Ist 
keines gesetzt, ist A=0. Ist zum 
Beispiel nur Bit 0 und 2 gesetzt, 
wird der Variablen der Wert 5 zu- 
gewiesen (210+212=5). 


BITON (a,b, ...) 

Die Bits a, b, ... des Userports wer- 
den auf 1 gesetzt; nur sinnvoll, 
wenn diese Bits auf Ausgang ge- 
schaltet sind. 


BITOFF (a,b. ...) 

Die Bitsa, b, ... des Userports wer- 
den auf 0 gesetzt; nur sinnvoll, 
wenn diese Bits auf Ausgang ge- 


schaltet sind. 
SCRON n.x,y 
Parameter: 


n=0—|1, x=0-3], 


y=1-24. Dieser Befehl blendet 


ständig den Zustand des User- 
ports (n=1) oder des Datenrich- 
tungsregisters (n=0) an der Posi- 
tion x,y auf dem Bildschirm ein. 
Ein “.“ bedeutet Bit=0, ein "t" 
Bit= 1: Beispiel: 

10 OUTPORT (0,1,2,3) 

20 SCRON0,10,5 

30 SCRONI,10,8 

Beim alten Betriebssystem muß 
der Farb-RAM entsprechend ge- 
setzt sein. 


SCROFF n 

Parameter: n=0: Datenrichtungs- 
register, n=1: Userport; schaltet 
die Anzeige auf dem Bildschirm 
ab. Beispiel: 

40 SCROFFO 

50 SCROFFI 


: System- und sonstige Befehle: 


HELP 

Alle Befehle von User-Basic wer- 
den aufgelistet. 

MEM 

Anzeige der Speicheraufteilung 
PAUSE w 


Parameter: w=0-—255: Zeit in 


WEN POMESMUTERRWORLE ZOM 


- IRQ-Sonderfunktionen. 


Zehntelsekunden. Verzögerung 
der Programmausführung. Bei- 
spiel: x 


10 PAUSE100 
Das Programm wird zehn Sekun- 
den angehalten. 


ACTIVE 
Bei einem RUN/STOP-RESTORE 
werden vom Betriebssystem wich- 
tige Zeiger in der Zero-Page ver- 
stellt. Diese Zeiger werden mit 
dem Befehl ACTIVE korrigiert. 
Achtung: Ist die Echtzeituhr aktiv, 
wird durch RUN/STOP-RESTORE 
die interne von 50 auf 60 Hertz ge- 
stellt, die Uhr geht nach. Dies 
kann nur durch den TIME-Befehl 
rückgängig gemacht werden. 


IRQ-Sonderfunktionen 
en a a 


IRQOOFF 

setzt alle aktiven Befehle zurück, 
welche die IRQ-Routine mitbenut- 
zen. IROOFF entspricht somit: 
SCROFF 0 

SCROFF 1 

CLOCKO 

MIXOFF 

NOFLASH 

NOBLINK 

TURNOFF 


INFO (x) 

informiert über die Belegung der 
l=Funk- 
tion ist aktiv, O=Funktion ist ausge- 
schaltet. 

x=0: Anzeige Ein-/Ausgänge 
User-Port (SCRONO-Befehl) 
x=1: Anzeige User-Port (SCRONI- 
Befehl) ' 
x=2: Echtzeituhr (CLOCK-Befehl) 
x=3: MIX-Befehl 

x=4: FLASH-Befehl 

x=5: BLINK-Befehl 

x=6: TURN-Befehl 

Beispiel: 

10 FOR I=0T05 

20 PRINTLINFOU 

30 NEXTI 
User-Basic ist als kombinierter 
Hexdump-Basiclader abgedruckt. 
Wie man mit dieser Art von Listing 
umgeht, steht auf Seite 6. Wegen 
seiner Länge ist das Programm in 
zwei Hälften aufgeteilt (Listing 1 
und 2). 

Wird es als Hexdump eingege- 


ben, so muß der Checker verwen- 

det werden. Als Startadresse ist 
080] anzugeben. Die Trennung 
des Hexdump in zwei Teile ist für 
den Checker bedeutungslos: Bei- 
de müssen beim Eintippen nahtlos 
aneinandergehängt werden. 


Lader in zwei Teilen 


Wird User-Basic als Basiclader 

eingegeben, so ist folgende Proze- 
dur genau zu beachten: 

l) Listing 1 abtippen und abspei- 

chern. 

2) dasselbe mit Listing 2. 

3) den Basicstart mit 

POKE 43,1:POKE 44,54: 
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POKE 54 # 256,0:NEW 
heraufsetzen. 

4) das Programm in Listing 1 la- 
den und mit RUN starten. 

5) dasselbe mit dem Programm in 
Listing 2. 


Das Maschinenprogramm steht 
nun fertig im Speicher und kann 
mit 

POKE 43, 1:POKE 44,8 

POKE 45,21:POKE 46,53 

SAVE "NAME'",8 

auf Diskette abgespeichert wer- 
den. 


Anschließend wird der Rechner 
mit SYS 64738 wieder in den Ein- 
schaltzustand versetzt. 


User-Basic wird mit LOAD 


"NAME"“,8 geladen und mit RUN 
gestartet. 


Speicheraufteilung: 


$8000-—$9FFF: 
$A000—$BFFF: 


$C000—$CBFF: 
$CC00—$CFFF: 


$D000—$DBFF: 


User-Basic 
unsichtbare Hi- 
res-Bit-Map 
User-Basic 
Farbspeicher 
der Hires-Bilder 
drei unsichtbare 
Lores-Bildschir- 
me 


$DC00-$DC57: Text für acht 
Funktionstasten 

$DC58—-$DDOD: Tabelle 
Quadratzahlen 
Lo 

$DDOE—$DDC3: Tabelle Qua- 
dratzahlen Hi 

$E000—$FFFF: sichtbare 
Bit-Map 

(Horst Abendschein) EEEMEEEEEEEEEN 


DATA 
DATA 
DATA 
DATA 
DATA 


48,08,C1,07,9E,28,32,31, 
32,33,29,20,20,20,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,28,20,290,20,20, 
20,20,20,20,20,12,11,55, 
DATA 53,45,52,AB,42,41,53,49, 
DATA 43,20,20,20,20,42,59,20, 
DATA 48,2E,41,42,89,53,43,48, 
DATA 45,49,4E,11,11,11,80,00, 
DATA 00,00,78,49,30,85,01,r2, 
DATA 28,A0,80,86,FA,84,FB,r2, 
DATA 13,A8,09,86,14,84,15,r2, 
DATA 208,A0,00,B1,14,91,FA,C8, 
DATA D®O,FS,E6,FB,E6,15,CA,D2, 
DATA F2,A2,008,A0,C0,86,FA,84, 
DATA FB,A2,13,AD,29,86,14,84, 
DATA 15,A2,0C,A0,00,B1,14,S1, 
DATA FA,C8,DO,F9,E6,15,E6,FB, 
DATA CA,DO,F2,A2,00,A0,DC,86, 
DATA FA,B4,FB,A2,BA,AB,0B,B6, 
DATA 14,84,15,A0,20,B1,14,5S1, 
DATA FA,CB,C0,58,D0,F7,A9,37, 
DATA 85,01,58,4C,E2,FC,EA,ERA, 
DAIA EA,4C,49,53,54,0D,00,00, 
DATA 020,200,00,00,52,45,4E,55, 


0383 
8331 
0333 
8sRA1 
B3A3 
0381 
03B3 
8SsC1 
8SCS 
853D1 
83D3 
oSEl 
83E3 
oSF1 
83F3 
ori 
DARDS 
or11 
8A13 
er21 
or2S 
oA31 
oA33 
orR41 
BA4S 
oAsı 
oAS3 
BAG 
BASS 
oA71 
0A73 
oRB1 
BABS 
orsı1 
oRS3 
BARl 
BARS 
BABI1 
oABS 
BACcı 
BACS 
BAD 
orD3 
BREI 
DRES 
ORFıl 
BOAFS 
0821 
0503 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


AS,2E,ES,2C,20,CD,BD,2®, 
39,80,A5,2F,E5,2D,AA,#S, 
30,ES,2E,28,C0,BD,28,39, 
80,45,31,ES,2F,AA,AS,32, 
ES,38,28,CD,BD,20,39,80, 
AS,37,E5,33,AA,AS,38,ES, 
DATA 34,20,CD,BD,20,39,80,#5, 
DATA 33,E5,31,AR,AS,34,ES,32, 
DATA 22,CD/BD,A9,0D,4C,D2,FF, 
DATA A9,29,20,AF,88,30,01,60, 
DATA 209,FD,AE,18,60,43,00,8D, 
DATA BE,C1,20,FA,AE,20,56,Ch, 
DATA 90,8E,C1,80,8E,C1,20,BE, 
DATA 80,90,F2,AD,8E,C1,60,4C, 
DATA 48,B2,20,6B,Ch,BA,Fo,orF, 
DATA 20,0C,81,8E,0C,80,8C,0D, 
DATA 80,80,10,80,4C,4E,81,20, 
DATA 0C,81,8E,0E,80,8C,0F,8®, 
DATA 860,11,88,4C,4E,81,20,FD, 
DATA AE,20,9E,87,E0,20,B0,Cr, 
DATA BA,48,20,FD,AE,20,3E,B7, 
DATA E0,18,80,C3,E8,68,A8,20, 
DATA 2B,81,49,01,60,B5,0D9,03, 
DATA 03,09,204,80,5C,C1,BD,F®, 
DATA EC,8D,9B,C1,38,18,60D,38, 
DATA C1,80,98,C1,90,03,EE,SC, 
DATA C1,AE,SB,C1,AC,SC,C1,6®, 
DATA AD,SB,C1,38,E9,28,85,FA, 
DATA AD,SC,C1,E9,00,85,FB,A®, 
DATA 07,B9,EB,C1,91,FA,88,10, 
DATA F8,60,20,6B,CA,A0,00,8n, 
DATA F0,17,8C,10,80,AD,0C,80, 
DATA AE,0D,80,85,FA,86,FB,nD, 
DATA 07,49,20,91,FA,88,10,FB, 
DATA 60,8C,11,80,AD,®E,80,AE, 
DATA OF,80,4C,79,81,AD,13,80, 
DATA FO,29,AD,19,D0,80,19,D®, 
DATA 10,1D,AD,12,D0,CD,1B,80, 
DATA B0,09,20,38,C4,AD,1B,80, 
DATA 4C,B7,81,20,AB,C4H,AD,ın, 
DATA 80,80,12,D0,4C,81,EA,AD, 
DATA 0D,DC,58,AS,FA,4B,AS,FB, 
DATA 48,AD,9D,C1,48,A5,01,48, 
DATA AS,14,48,A5,15,48,AD,10, 
DATA 80, F®,0C,AD,21,DD,AE,®C, 
DATA 80,AC,00,80,20,F2,82,AD, 
DATA 11,80,F0,0C,AD,03,DD,RE, 
DATA 8E,80,AC,0F,80,20,F2,82, 
DATA AD,88,02,C9,04,D®,40,AD, 


DATA 4D,20,00,00,00,00,00,52, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


S5,4E,2D0D,20,00,00,00,00, 
002,020,43,41,54,41,4C,4F, 
47,0D,08,20,00,44,55,4D, 
50,2D,00,00,00,20,00,00, 
4D,45,4D,2D0,00,00,00,00, 
00,00,20,46,49,4E,44,00, 
00,00,00,00,20,00,48,45, 
4C,50,00,008,00,00,00,00, 
00,EA,EB,BA,SE,FE,C3,C2, 
DATA CD,38,30,4C,2A,83,00,04, 
DATA 20,04,00,00,20,00,00,00, 
DATA 20,20,00,04,20,00,00,00, 
DATA 00,00,00,20,20,00,09,00, 
DATA 20,28,20,20,D9,04,D08,01, 
DATA 01,01,921,29,09,09,09,00, 
DATA 21,02,03,E6,D6,A6,D6,Aß, 
DATA 0B,20,0C,ES,38,69,20,CC, 
DATA FF,A2,00,BD,B6,C1,F®,86, 
DATA 20,D2,FF,E8,D8,F5,20,13, 
DATA ES,CA,CA,CA,CA,CA,CA,8BE, 
DATA 0D6,20,39,80,A5,37,E5S,2B, 
DATA AA,AS,38,ES,2C,20,CD,BD, 
DATA 20,39,80,A5,2D,ES,2B,AA, 
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OcBi1 
OCcBS 
OcCc1 
occ3 
ocD1 
ocDs 
OCEi 
OCES 
ocrı 
OcF3 
2021 
0083 
onDı11l 
8013 
on21 
8023 
0031 
8033 
oD41 
2049 
oDS1 
8053 
ODE1 
oDES- 
0071 
8073 
oDB1 


ae 


Basic- 
Erweiterung 


12,80,F0,3B,A9,00,AE,18, 
80,AD,19,80,86,FA,85,FB, 
AD,0B,DC,F®,11,C9,80,390, 
OF,293,7F,C9,12,F0,29,F8, 
18,569,12,D8,D9,02,49,08, 
20,0R,83,AD,2A,DC,20,0n, 
83,AD,09,DC,20,0A,83,AD, 
08,0C,093,30,20,22,83, AD, 
14,89,F0,30,CE,1E,89,D®, 
2B,AD,1F,80,80,1E,80,20, 
E3,82,B1,FA,29,0F,CD,1C, 
80,08,05,AD,1D,80,91,FA, 
C8,D®O,EF,E6,FB,CA,DO,EA, 
AD,1C,80,AE,1D,80,8D,1D, 
80,8E,1C,80,AD,15,80,F®, 
1E,CE,22,80,D0,19,A9, 37, 
85,021,AD,23,80,8D,22,80, 
AD,21,80,AE,20,80,BE,20, 
DO,8E,21,80,80,20,80, AD, 
16,80,F0,33,CE,24,80,D®, 
PE,RO,00,A9,04,84,14,85, 
15,AD,25,80,8D0,24,80,20, 
E3,82,B1,FA,29,0F,CD,26, 
80,0D2,0A,B1,14,C9,20,F®, 
04,49,80,91,14,C8,D0,EA, 
E5S,FB,E6,15,CA,D®,E3,68, 
85,15,68,85,14,68,85,01, 
68,8D,3D,C1,68,85,FB,68, 
85,FA,4C,31,EA,AD,00,#3, 
D8,84,FA,85,FB,A9,37,85, 
81,A2,04,60,86,FA,B4,FB, 
8D,SD,C1,A8,07,A9,2E,6E, 
SD,C1,30,02,A9,1E,31,FA, 
88,10,F2,60,48,29,F®,4R, 
yA,4A,4A,18B,69,30,20,22, 
83,68,29,0F,18,69,30,20, 
22,83,49,3A,91,FA,C8,60, 
AB,4C,A2,B3,AD,30,C1,8D, 
S4,C1,AD,8E,C1,8D,35,C1, 
AC,S5,C1,AE,8BF,C1,20,2B, 
81,86, FA,84,FB,A9,00,AD, 
937,C1,F0,07,18,A5,FB,68, 
D4,85,FB,AD,32,C1,31,FA, 
EE,35,C1,CE,94,C1,10,D8, 
EE,8F,C1,CE,91,C1,18,C4, 
60,A5,2D,A4,2PE,85,14,84, 
15,C4,30,D0,02,C5,2F,B®, 
18,69,802,380,01,C8,85,22, 
84,23,20,AD,83,20,E1,83, 
BA,10,07,20,EA,83,4C,SC, 
83,50,98,30,06,20,FA,83, 
4C,3C,83,20,03,84,A9,0D, 
20,D2,FF,AS,14,A4,15,18, 
69,07,38,C1,C8,B®,BE,RD, 
09,B1,14,AA,29,7F,20,D2, 
FF,C8,B1,14,A8,29,7F,F®, 
03,20,D2,FF,8A,10,11,38, 
38,0A,n9,21,20,D2,FF,68, 
68,4C,3C,83,A9,25,D®,4E, 
S8,10,04,R9,24,D0,47,60, 
20,D2,FF,A9,20,20,D2,FF, 
AS,3D,D®,3A,R8,00,B1,22, 
AA,CB,B1,22,R8,8A,20,55, 
B3,4C,FD,83,20,A6,BB,20, 
DD,BD,4C,1E,AB,20,22,84, 
AB,02,B1,22,85,25,88,Bl, 
22,85,24,88,B1,22,85,26, 
FO,0R,B1,24,28,D2,FF,CB, 
C4,26,D0,F6,49,22,4C,D2, 
FF,A93,E0,85,15,A9,A0,85, 
FB,20,F3,C4,A0,00,84,FA, 
84,14,B1,14,48,Bl,FA,91l, 
14,68,91,FA,C8,DO,F3,E6, 
FB,E6,15,D8,ED,20,E6,C4, 
60,20,6B,Ch,BA,F®,06,R2, 
E®B,AB,ABO,DO,24,A2,AO,RD, 
E0,86,15,84,FB,20,F3,C4, 
AB,00,84,14,84,FA,A2,20, 
Bi,FA,11,14,91,FA,C8,D®, 
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F7,E6,FB,E6,15,CA,D®,F®, 
20,E6,C4,60,A5,2B,A4,2C, 
85,22,84,23,00,03,C8,B1, 
22,00,FB,C8,38,18,65,22, 
AB,00,31,2B,45,23,69,08, 
C8B,31,2B,88,A2,03,E6,22, 
D0,02,E6,23,B1,22,D0,F4, 
CA,DO,F3,AS,22,69,02,85, 
2D,AS,23,69,00,85,2E,4C, 
63,46,20,22,C3,20,68,C#, 
BE,32,C1,20,FD,AE,20,F3, 
CA,8n,DO,2F,20,AA,85,20, 
C3,85,20,05,85,EE,33,C1, 
CE,95,C1,30,12,20,E8,85, 
CE,33,C1,20,EF,85,EE,33, 
C1,20,C3,85,4C,DB,84,20, 
D9,85,EE,8F,C1,CE,91,C1, 
19,D2,60,C9,01,00,39,18, 
AD,8E,C1,6N,90,C1,8N,8F, 
C1,20,AA,85,20,C3,85,20, 
D5,85,CE,33,C1,CE,35,Cl, 
30,12,20,E8,85,EE,33,C1, 
20,EF,85,CE,33,C1,20,C3, 
85,4C,18,85,20,09,85S,EE, 
8F,C1,CE,31,C1,18,D2,60, 
C9,02,00,2F,20,AA,85,20, 
C3,85,20,05,85,EE,34,C1, 
CE,36,C1,30,12,20,E8,85, 
CE,34,C1,20,EF,85,EE,94, 
C1,20,C3,85,4C,4B,85,20, 
D9,85,EE,8E,C1,CE,30,C1, 
10,D2,60,18,AD,8F,C1,6D, 
91,C1,8D,8F,C1,28,AA,85, 
20,C3,85,20,05,85,CE,94, 
C1,CE,96,C1,30,12,20,E8, 
85,EE,34,C1,20,EF,8S,CE, 
34,C1,20,C3,85,4C,84,85, 
20,09,85,EE,8E,C1,CE,30, 
C1,10,02,60,AD,8E,C1,8D, 
93,C1,AD,8F,C1,8D,94,C1, 
AD,30,C1,8D0,95,C1,AD,31, 
C1,80,96,C1,60,AE,S4,C1, 
AC,33,C1,20,2B,81,86,14, 
84,15,A8,00,B1,14,60,8D, 
937,C1,60,49,20,AE,32,C1, 
F®,03,AD,37,C1,N0,00,31, 
14,50,20,C3,85,80,58,C1, 
60,20,C3,85,AD,38,C1,31, 
14,60,20,9E,B7,8E,28,D®, 
20,FD,AE,20,3E,B7,BE,21, 
D0,59,20,6B,CA,EC,17,80, 
8E,17,80,F0,F4,4C,27,84, 
A9,08,85,BA,20,B4,FF,ng, 
6F,85,B9,20,96,FF,A2,00, 
20,AS,FF,C9,00,F®,06,9D, 
35,02,E8,00,F3,A9,00,3D, 
35,02,4C,AB,FF,20,79,00, 
D0,0R,20,16,86,49,35,A0, 
02,4C,1E,AB,20,3E,AD,20, 
A3,B6,8D,8E,C1,86, 14,84, 
15,20,n0,88,A0,00,8C,8F, 
C1,AC,8F,C1,B1,14,20,AB, 
FF,EE,8F,C1,CE,8E,C1,08, 
FO,20,CC,FF,A6,3A,EB,F®, 
C3,60,4C,48,B2,20,9E,B7, 
EO,04,B0,F6,EC,35,80,F®, 
FO,AC,35,80,8E,35,80,8n, 
A2,06,CA,DD,35,80,D®,FA, 
38,30,35,80,AD,20,D0,48, 
AD,21,D®,48,BD,31,80,8D, 
31,80,80,20,08,BD,2D,80, 
8D,2D,80,8D,21,D0,68,5D, 
2D,80,68,30,31,80,49,00, 
85,14,49,04,85,15,BD,26, 
80,85,FA,BD,29,80,85,FB, 
A2,04,10,00,A9,30,78,85, 
01,B1,14,48,B1,FA,91,14, 
68,31,FA,88,00,F3,E6,15, 
ES, FB,CA,D®,EC,4C,E6,C4, 


1008 
1011 
1013 
1021 
1029 
1031 
1039 
1041 
1049 
1051 
1859 
1061 
1069 
1071 
1079 
1081 
1089 
1091 
1839 
1oR1 
10R3 
1081 
1083 
10C1 
12C3 
1001 
1008 
10E1 
19E3 
10F1 
10F3 
1101 
1103 
1111 
1119 
1121 
. 1129 
1131 
1139 
1141 
1131 
1139 
1141 
1143 
1151 
1153 
1161 
1163 
1171 
1179 
1181 
1189 
1191 
1199 
11al 
11A9 
11B1 
1189 
11c1 
11c3 
1101 
1103 
11E1 
11E9 
11Fı 
11F9 
1201 
1209 
1211 
1219 
1221 
1229 
1231 
1239 
1241 
1249 
1251 
1253 
1261 
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2578 
2589 
2590 
2608 
2610 
26208 
2630 
2640 
2658 
26608 
2670 
26808 
26908 
27008 
2710 
2720 
2730 
2740 
2750 
2769 
2770 
2780 
2790 
28008 
2818 
2820 
2830 
2849 
2858 
2868 
2870 
2880 
2838 
2398 
2918 
2929 
2338 
2940 
2350 
2968 
2978 
29350 
2968 
2970 
29808 
2998 
3988 
30190 
3028 
3838 
3849 
3858 
3068 
3970 
3088 
3090 
3100 
3110 
3128 
3130 
31408 
3150 
3160 
3178 
3188 
3190 
32098 
3210 
3220 
3230 
3240 
3250 
32608 
32708 
32890 
3299 
33808 
3310 
3328 
3338 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Basic- 


Erweiterung 


AS,20,85,FA,AS,D0,85,FB, 
28,EE,C4,A9,20,A2,0C,nD, 
00,91,FA,CB,DO,FB,E&G,FB, 
CA,D®,F6,FO,E9,20,DA,CB, 
80,A6,C1,60,AD,17,80,F®, 
0E,A2,00,8E,17,80,20,27, 
84,20,D0D,CB,8D0,A6,C1,AD, 
AB,C1,F0,1B,A9,00,8D,AD, 
C1,20,13,ES,CA,CA,22,0C, 
ES,A6,39,A5,3A,86,14,85, 
15,20,13,A6,4C,C9,A6,4C, 
83,A4,20,ED,F6,D0,0D,08, 
AB,3A,EB,F®,06,20,AB,C4, 
EE,AB,C1,28,60,20,51,8C, 
20,793,00,D00,6B,A9,01,8D, 
SD,C1,A2,00,BD,F3,C1,20, 
D2,FF,E8,E®,05,D0,FS,AE, 
SD,C1,49,08,20,CD,BD,As, 
2eC,20,D02,FF,R9,22,20,D2, 
FF,AE,SD,C1,20,BB,87,20, 
EE,C4H,Bl,FA,20,E6,C4,Cs, 
OD,F®,0A,CS,00,F8,0B,20, 
D2,FF,C8,D®,EA,AS,5SF,20, 
D2,FF,A9,22,20,D2,FF,EE, 
SD,C1,AD,3D,C1,C39,29,30, 
B1,60,R9,080,18,CA,F2,04, 
69,08,38,F9,85,FA,A9,DC, 
85,FB,A0,20,60,4C,48,B2, 
28,39E,B7,BA,F®,F7,C3,09, 
B®O,F3,20,BB,87,28,FD,AE;, 
20,3E,AD,20,A3,B6,C9,08B, 
30,23,4C,58,B5,856,14,84, 
15,28,EE,C4,AA,AB,20,CA, 
38,8D,B1,14,C9,5F,D8,®02, 
A9,0D0,31,FA,CB,DO,F®o,As, 
00,91,FA,4C,E6,C4H,A6G,3n, 
EB,D0,33,A6,CB,E0,07,E2, 
eD,EO,03,99,29,E4,C5,F®, 
25,86,6C5,CA,CA,CA,BD,F7, 
E1,AA,AD,BD,02,4A,50,01, 
EB,20,EE,C4,20,B8,87,B1, 
25,86,C5,CA,CA,CA,BD,F7, 
C1,AA,AD,8D,02,4A,39,01, 
EBß,20,EE,C4,20,B8,87,B1, 
FA,FO,06,99,77,02,C8,n08, 
F6,84,C06,20,E6,C4,4C,48, 
EB,A9,23,20,FF,AE,4C,SE, 
B7,4C,08,AF,20,47,88,Bn, 
A2,08,R0,02,20,BA,FF,20, 
FD,AE,20,9E,AD,20,A3,B6, 
AA,FO,E6,AB,00,B1,22,59, 
10,02,C8,CA,D®,F7,A9,2C, 
939,10,02,99,12,02,C8,A9, 
4C,99,10,02,C8,C8,8C,SD, 
C1,20,FD,AE,20,9E,B7,8A, 
AC,SD,C1,99,10,02,C8,38, 
A2,180,AB,02,20,BD,FF,4C, 
CO,FF,A9S,6F,85,B9,A9,08B, 
85,BA,A2,00,86,B87,4C,79, 
F2,A0,08,D01,7A,D0,05,20, 
73,00,38,60,18,60,20,8A, 
AD,20,F7,B7,20,A0,88,A9, 
/5Sd,20,AB8,FF,A9,02,20,RB, 
FF,AS,14,20,AB,FF,AS5,15, 
2B,AB,FF,AS,2C,20,AF,88, 
S0,07,28,9E,B7,8A,20,RB, 
FF,4C,CC,FF,4C,48,B2,20, 
47,88,20,C6,FF,20,FD,RE, 
28,9E,B7,8A,F®,EE,48,20, 
FD,AE,20,8B,B0,A6,0D,Fo, 
23,85,49,84,4A,20,A3,B6, 
68,20,75,B4,A0,02,B3,61, 
08,91,49,88,10,F8,C8,20, 
CF,FF,931,62,C08,C4,61,D0, 
F6,4C,CC,FF,4C,399,AD,29, 
SE,B7,8E,SD,C1,208,FD,AE, 
20,9E,B7,8E,BF,C1,20,FD, 
AE,20,8B,B8,A6,0D0,FO,E4, 
85,FA,B4,FB,AB,80,B1,FR, 
CD,3D,C1,F0,3E,990,03,4C, 


12569 
1271 
1273 
1281 
1289 
1291 
1293 
12RA1 
12A9 
12B1 
1283 
12C1 
12C9 
12D1 
1209 
ı12E1 
12E3 
12F1 
12F9 
1301 
1383 
1311 
1319 
1321 
1329 
1331 
1339 
1341 
1349 
1351 
1359 
1361 
1369 
1371 
1379 
1381 
1383 
1391 
1333 
ı13Al 
13A3 
13B1 
1389 
13C1 
13C3 
13D1 
1303 
ı13E1 
13E9 
13F1 
13F9 
1401 
1409 
1477 
1419 
1421 
1423 
1431 
1439 
1441 
1449 
1451 
1451 
1459 
1461 
1469 
1471 
1479 
1481 
1489 
1491 
1453 
14Al 
14A9 
14B1 
14B93 
14C1 
14C9 
14D1 
14D9 


58,B5,80,8E,C1,C8,Bl,FA, 51 
85,14,C8,B1,FA,85,15,AD, 64 
9D,C1,20,70,B4,A8,08,CC, CB 
8E,C1,F0,08,B1,14,91,62, 80 
C8,4C,6D,893,AD,BF,C1,91, AD 
62,C4,61,F0,24,C8,4C,7D, ıC 
89,A9,02,B9,61,00,91,FA, 2A 
88,10,F8,60,20,CC,FF,4C, 16 
08,AF,AS,00,8D0,8E,C1,8D, 35 
8F,C1,80,90,C1,A9,23,20, E6 
AF,88,90,89,20,9E,B7,20, C7 
C3,FF,20,FD,AE,20,3E,AD, 6C 
20,R3,B6,86,FA,84,FB,80, 90 
SD,C1,AB,F®,CF,A8,00,C8, FC 
CC,3D,C1,F8,0E,B1,FA,C9, BE 
BE,D®O,F4,8C,8E,C1,EE,S0, Fi 
C1,DO,EC,AD,8E,C1,00,06, C7 
AD,SD,C1,8D,8E,C1,20,FD, 34 
AE,20,8A,AD,20,DD,BED,A®, CB 
FF,C8,B9,90,01,F8,18,C9, 508 
2E,D®,03,8C,8F,C1,C9,45, 28 
DO,EF,A9,3F,20,D2,FF,CE, CA 
SD,C1,D@,F8,4C,CC,FF,AD, 86 
8F,C1,D0,04,38,8D,8F,Cı, 72 
38,AD,8E,C1,ED,8F,C1,38, E? 
E1,AA,A9,20,E0,00,F0,0B, 83 
28,D2,FF,CE,SD,C1,CA,D®, 55 
F3,A2,00,BD,808,01,20,D2, E2 
FF,CE,SD,C1,E8,EC,8F,Cı, D7 
D8,F1,AD,S®,C1,F0,C5,n9, ES 
2E,DD,00,01,00,12,BD,08, CB 
01,F0,0B,20,D2,FF,E8,CE, EA 
SD,C1,F8,B90,D@,F0,A9,30, 75 
20,D2,FF,CE,SD,C1,D0,F6, 35 
FO,A2,20,15,FD,28,A3,FD, DB 
20,5B,FF,58,20,BF,E3,A9, 07 
09,A2,80,80,83,02,85,37, 28 
86,38,8E,84,02,49,09,r2, 19 
07,R8,00,8C,R2,C1,8C,A3, A6 
C1,8C,A4,C1,80,180,80,8C, 87 
11,89,8C,12,80,8C,13,80, 32 
BC,8C,C1,8C,17,880,8C,14, 44 
802,8C,9D,C1,8C,15,80,8C, 3B 
86,02,8C,16,80,8D,20,08, 3C 
8E,21,09,8C,18,80,49,04, EE 
80,19,80,A9,3E,AB,C4,20, BD 
2D,E4,A9,A8,20,02,C4,n9, BC 
E®,8D,R6,C1,20,D2,C4,A9, Al 
01,28,17,C5,20,EE,86,20, CD 
51,8C,R9,0A,A0,64,80,8D, 9F 
C1,8C,8B,C1,AC,9D,C1,20, AF 
A2,B3,20,0C,BC,A5S,61,20, 5B 
2B,BA,20,AA,Bl,AE,SD,C1, C7 
20,EE,C4,9D,0E,DD,38,23, 86 
58,DC,20,E6,C4,EE,3D,C1, 69 
AC,SD,C1,C0,85,D0,D8,4C, 81 
90,E3,28,1B,C6,8C,8E,C1, C6 
BE,8F,C1,80,90,C1,20,00, 15 
8C,8E,92,C1,20,00,8C,8E, E® 
91,C1,20,8F,C5,AE,91,C1, 48 
CA,BE,91,C1,E8,20,1E,BC, 66 
20,95,83,29,0C,BC,AE,32, 8A 
20,395,B3,20,0C,BC,AE,92, BA 
C1,20,1E,8C,8C,92,C1,8D, 61 
93,C1,20,95,83,A5,61,20, AD 
12,BB,20,0C,BC,A9,00,80, F2 
S4,C1,20,EE,C4,AE,S4,C1, EF 
38,AD,92,C1,FD,58,DC,n8B, 35 
AD,33,C1,FD,8E,DD,20,E6, 4A 
C4,28,95,8B3,A5,61,20,2B, BF 
BA,20,9B,BC,AE,31,C1,20, 36 
1E,8C,C5,64,F8,05,B0,08, 85 
4C,A2,8B,98,C5,65,30,0C, 81 
CE,S1,C1,20,AB,8B,AD,S1, 19 
C1,D0,BF,60,20,AB,8B,EE, 6? 
34,C1,4C,9C,8B,20,EE,C4, 18 
18,AD,8F,C1,60,94,C1,85, 4F 
FA,AD,392,C1,69,00,85,FB, ®E 
18,AD,91,C1,6D,8E,C1,5B8, 2C 
05,80,3D,C1,20,2A,8C,38, Ad 
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>» 


14EL1 
14E9 
ı4F1 
14FS 
1501 
1503 
1511 
1519 
1521 
1523 
7531 
1539 
1541 
1549 
1551 
1559 
1561 
1563 
1571 
1579 
1581 
1589 
1591 
1599 
ı15F1 
15A9 
15B1l 
1589 
15C1 
1509 
1501 
1503 
15E1 
15E9 
ı5F1 
15F93 
1601 
1603 
1611 
1619 
1621 
1629 
1631 
1639 
1641 
1649 
1651 
1659 
1661 
1669 
1671 
1679 
1681 
1683 
1691 
1633 
16Al 
16A3 
16B1 
16B3 
16C1 
16C9 
16D1 
1609 
16E1 
16E3 
16F1 
16F9 
1701 
1703 
1711 
17.29 
ı721 
1729 
1731 
1739 
1741 
1749 
1751 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Basic- 


Erweiterung 


AD,8E,C1,ED,31,C1,30,06, 
8BD,3D0,C1,20,2A,8C,38,AD, 
BF,C1,ED,34,C1,85,FA,AD, 
98,C1,E9,00,85,FB,18,AD, 
8E,C1,6D,91,C1,B®,06,8D, 
9D,C1,208,2A,8C,38,AD,SE, 
C1,ED,31,C1,30,06,8D,30, 
C1,20,2n,8C,4C,E6,C4,20, 
FD,AE,20,3E,B7,8R,F0,0S, 
C93,B5,B8,01,60,4C,48,B2, 
20,EE,C4,BC,58,DC,BD,®E, 
DD,4C,E6,C4,29,CA,C9,80, 
EB,4C,A5,C5,20,18,C6,8[, 
BE,C1,8E,8F,C1,8D,30,C1, 
29,00,8C,8E,32,C1,4C,2D, 
88,84,63,85,62,A2,30,38, 
4C,49,BC,78,49,0C,R0,88, 
BD,8BF,02,8C,30,02,43,1®, 
Ad,C0,80,08,03,8C,09,03, 
A9,43,A0,C0,80,06,03,8C, 
07,03,49,7F,A0,C0,8D,04, 
03,8C,05,03,49,33,r0,81, 
8D,14,03,8C,15,03,n9,12, 
A9,87,8D,02,03,8C,03,03, 
A9,48,A0,87,80,28,03,8C, 
293,03,49,C3,A0,C4,8D,00, 
03,8C,01,03,A9,AE,AD,BC, 
80,0R,23,8C,0B,03,58,69, 
A9,00,85,00,20,73,00,C3, 
CF,F0,0E,C3,24,F0,34,C3, 
25,F0,5B,20,79,00,4C,8D, 
AE,20,73,00,38,E3,CC,0A, 
AA,BD,E3,SA,80,DF,8C,BD, 
E4,94,80,E0,8C,20,73,00, 
4Cc,FF,FF,A9,00,A2,0R,35, 
SD,CA,10,FB,60,4C,79,08, 
4C,7E,B9,20,E1,8C0,20,73, 
00,90,0B,C9,41,90,EE,C9, 
47,BO,ER,38,E9,07,38,E3, 
30,48,R5,61,F0,07,18,69, 
04,B0,DD,85,61,68,F®,DE, 
20,7E,BD,4C,F4,8C,20,El, 
8C,20,73,00,C9,32,B0,C5 
C9,30,90,C1,E9,30,48,45, 
61,F0,04,E6,61,F0,B9,68, 
FO,E7,20,7E,BD,4C,1F,6BD, 
68,68,68,AD,12,D8,CD,1B, 
80,B0,09,20,AB,C4,AD,1B, 
89,4C,58,80,20,30,C4, AD, 
1A,80,80,12,D8,4C,BC,FE, 
20,1B,C6,8C,BS,C1,BE,AB, 
C1,80,A9,C1,20,FD,AE,2®, 
9E,B7,8E,8E,C1,20,FD,RE, 
20,FF,ED,A2,FB,Ad,C1,20, 
D4,BB,20,8F,C5,A9,FB,AD, 
C1,20,R2,BB,20,64,E2,20, 
OC,BC,AC,8E,C1,20,R2,83, 
AS,61,20,2B,BA,20,0C,BC, 
AC,BS,C1,20,R2,B3,A5S,61, 
20,6n,B8,20,An,Bi,AA,FD, 
23,4C,1B,8C,8C,3D,C1,#9, 
C7,38,ED,SD,C1,8D,3D,C1, 
AS,FB,AB,C1,20,A2,BB,20, 
6B,E2,20,8C,BC,AC,8E,C1, 
20,n2,83,A5,61,20,2B,Bn, 
20,,0C,BC,RC,AB,C1,AD,ng, 
C1,20,47,8C,A5,61,20,6A, 
BB,20,AA,B1,84,FA,85,FB, 
20,CA,C9,90,03,4C,1B,8C, 
20.F3.C4.20.46,C6,4C.E6, 
C4,20,94,8E,20,47,8C,#9, 
AB,AD,AE,20,28,BA,20,0C, 
BC,AO,B4,290,A2,B3,#5,61, 
y4C,12,BB,20,FA,AE,20,FF, 
8D,4C,F7,AE,20,DA,CB,8S, 
FB,A9,00,85,FA,20,FD,RE, 
29,9E,B7,8E,3D,C1,20,FD, 
AE,20,9E,AD,4C,A3,B6,20, 
22,BE,20,BD,FF,A3,0B,AE, 
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17593 
1761 
1763 
1771 
1779 
1781 
1783 
1731 
1739 
ı17Al 
17A9 
17B1 
17B3 
17C1 
17C3 
1701 
17D3 
17El 
17E3 
17F1 
17F9 
1B01 
1803 
1811 
1819 
1821 
1823 
1831 
1839 
1841 
18493 
1851 
18593 
1861 
1869 
1871 
1873 
1881 
1889 
1891 
1893 
ı8A1 
18A9 
18B1 
1889 
18C1 
18C9 
18D1 
1803 
ı18E1 
18ES 
1BF1 
18F9 
1901 
1903 
15311 
1913 
1921 
1923 
1931 
1933 
1341 
1949 
1951 
19359 
1361 
1969 
1971 
1979 
1981 
19389 
1931 
19993 
ı19A1 
19A3 
19B1 
19B3 
13C1 
19C3 


4920 
4939 
4949 
4959 
4350 
4970 
4980 
4330 
5o02 
5918 
Ss22®8 
5030 
5040 


‚5950 


So6D 
5070 
5988 
5030 
5108 
Sıil® 
S120 
5130 
5140 
5150 
5160 
5170 
5180 
5190 
52008 
s2l® 
52208 
5230 
52408 
5250 
5260 
5278 
tz: 15) 
5230 
5390 
5310 
5320 
5338 
5340 
5358 
5360 
5370 
5380 
5398 
5400 
541® 
5420 
5430 
5440 
5458 
5460 
5470 
5488 
5430 
5509 
5519 
5520 
5539 
5540 
SSS® 
5568 
5570 
S55B® 
5598 
el=1%]4] 
5618 
5628 
5638 
5649 
5658 
5668 
5670 
SE88 
=]=E]%) 
5708 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
BATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


EY,20,02,FF,CB,D®,.Fe,ES 


FB,CA,D®,ED,A9,0B,20,C3, 
FF.4C,CC.FF,20,22,8E,28, 
BD,FF,AE,3D,C1,N0,00.20, 
BA,FF,A2,00,A4,FB,A3,00, 
4C,D5,FF,4C,08,AF,20,BA, 
AD,20,F7,B7,A4,14,A5,15, 
60,20,94,8E,84, FA,85,FB, 
20,FD,AE,20,94,8E,8C,6E, 
E1,80,8F,C1,EE,8E,C1,D®, 
03,EE,8F,C1,68,68,AD,ve, 
03,80,90,C1,AD,03,03,8D, 
91,C1,49,D2,80,02,03,n3, 
8E,8D,03,03,A5S,FA,A4,FB, 
85,14,84,15,49,00,80,00, 
02,20,ED,F6,F0,0E,AS,FA, 
CD,8E,C1,00,16,A45,FB,CD, 
8F,C1,D®,0F,AD,30,C1,8D, 
02,03,RD,91,C1,80,03,03, 
4C,74,A4,E6,Fn,D9,02,E6, 
FB,4C,A4,A4,20,EB,B7,BA, 
D0,03,4C,48,B2,86,97,#5, 
14,48,45,15,48,49,80,85, 
96,20,79,90,BO,EC,n9,C1, 
AQ,FE,80,18,03,8C,19,03, 
A9,00,85,96,68,85,15,68, 
85,14,20,79,30,20,BE,A6, 
4C,5D,30,10,03,B1,7A,4B, 
C8,B1,7A,48,C8,20,FB,RB, 
n2,03,86,0F,86,08,A0,FF, 
C8,E8,B1,7A,30,FC,21,F®, 
20,C9,22,D0,0C,n5,0F,49, 
FF,85,0F,4C,56,8F,4C,e1, 
90,24,0F,30,E3,24/08,30, 
DF,C9,8F,D9,04,85,08,F®, 
D7,86,97,A2,04,0D,02,C2, 
FO,08,Ch,10,F8,n6,97,4C, 
S6,8F,20,FB,N8,20,73,00, 
B0,70,20,6B,N9,n9,00,ne, 
D6,85,AC,86,D,78,45,01, 
48,09,34,85,01,38,A5,AC, 
ES,FD,AS,AD,ES,FE,BO,1E, 
A®,02,B1,AC,C5,14,D9,07, 
C8,Bl,AC,CS,15,F0,15,95, 
AC,18,69,04,85,AC,A5,AD, 
69,00,85,ND,90,D7,nR2,FF, 
AD,FF,D0,09,A0,01,Bl,AC, 
AA,88,Bl1,AC,nB,68,85,01, 
58,86,62,12,00,86,0D,84, 
63,R2,30,38,20,49,BC,20, 
DD,BD,A6,37,B3,00,01,F0, 
07,E8,3D,FC,01,C8,D0,F4, 
86,37,A6,97,20,79,20,C9, 
2C,F0,07,C9,AB,F0,03,4C, 
54 ,BF,E8,86,97,3D0,FC,01, 
4C,93,8F,20,FB,n8,E8,Bn, 
AB,68,85,15,68,85,14, AD, 
02 ,03,80,8E,C1,AD,03,03, 
8D,8F,C1,n9,46,80,02,03, 
A9,30,80,03,03,4C,n2,R4, 
AD,8F,C1,80,03,03,AD,6E, 


C1,80,02,03,28,BC,A8,nD, 
05,20,FB,AB8,20,3B,A9,AB, 
02,B1,7A,F0,03, 4C,4y1,BF, 
A9S,47,A@,FE,80,18,03,BEC, 


19.03. 20,53. A5,20,33,#5, 
4C,85,E3,A9,00,A2,D6,85, 
FD,86,FE,78,A5,01,48,A9, 
34,85,01,A5,2B,A6,2C,85, 
SF,86,60,A0,01,B1,5F,F®, 
4UEB,BL,SEN ST, FD,CB,BT, 
5F,91,FD,A5,15,C9,FA,BBd, 
3E,48,24,96,30,07,91,5F, 
88,A5,14,91,5F,A0,00,RA5S, 
14,975FD,18,65,97,8571%, 


SD,C1,A0,01,20,BA,FF,20, 
C®,FF,A2,0B,20,C9,FF,c20, 
D2,FF,28,D2,FF,A2,20,A0, 
00,20,F3,C4,B1,FA,20,E6, 


[ei",) 
BE 
FF 
81 
7A 
or 

EB 
D1 

AF 

1A 
EB 
5A 
BS 
Ss2 


BF. 


66 
ec 
==) 
14 
65 
CF 
DF 
y4F 
DD 
11 
EE 
F6 
OB 
AS 
28 
6F 
64 
23 
33 
ca 
C5 
GH 
El 
6D 
AE 
3D 
EB 
54 
HF 
11 
53 
1B 
94 
c93 
9D 
OB 
EB 
96 
8c 
F9 
D7 
DD 
EE 
ıB 


DB 


FA 
12 
CH 
5B 
71 
9SF 
e6 
46 
FO 
al 
Bo 
3F 
39 
53 
73 
BC 
DF 
Bl 
A7 


Basic- 
Erweiterung 


C8,68,31,FD,69,00,85,15, 
BO,1D,AS,FD,69,04,85,FD, 
90,02,E6,FE,B1,5F,nn,88, 
B1,5F,4C,8D,90,R0,01,n9, 
FF,S1,FD,C8B,31,FD,18,68, 
85,01,58,60,20,D4,E1,AS, 
2D,38,E9,02,AA,AS,2E,E3, 
00,nB,n9,00,85,04,85,B9, 
4C,75,E1,20,34,8E,84, Fan, 
85,FB,20,FD,AE,20,34,BE, 
AAN,SB,AD,00,31,FA,CB,Bn, 
91,FA,60,20,FA,AE,20,94, 
BE,84,FA,85,FB,A0,01,81, 
FA,48,88,B1,FA,nB,68,20, 
47,8C,4C,F7,AE,20,DE,CS, 
2®,FD,AE,20,9E,AD,20,93, 
B6,8D,8E,C1,86,14,84,15, 
An,F®,57,20,8F,C5,20,F3, 
C4,AO,00,8C,8F,C1,B1,14, 
48,29,7F,C9,55,D0,06,CE, 
9D,C1,4C,89,31,C9,44,D®, 
06,EE,30,C1,4C,89,31,C9, 
4C,D0,0E,38,AS,Fn,E3,01, 
85,FA,B®,0F,C6,FB,4C,83, 
91,C9,52,00,1A,E6,FA,D8, 
02,E6,FB,68,30,03,20,2A, 
8C,EE,8F,C1,AC,8F,C1,CC, 


8E,C1,D8,BA,4C,E6,C4,20, 
E6,C4,4C,08,AF,20,47,88, 
BE,3D,C1,20,FD,AE,AD,AB, 
C1,48,28,DA,CB,8D,A6,C1, 
AE,SD,C1,20,C9,FF,20,C1, 
92,A9,FF,8D,30,C1,A9,07, 
BD,30,C1,20,1A,33,D®,03, 
4C,AB,32,R9,00,85,FA,85, 
FB,80,32,C1,80,33,C1,3, 
28,8D0,31,C1,49,00,8D,8E, 
C1,20,F3,C4,EE,3D,C1,20, 
©2C,C5,AE,BE,C1,R0,00,B1, 


FC,SD,FB,C1,EE,8E,C1,EB, 
‚EC,930,C1,D0,E7,20,86,C4. 
CA,BD,FB,C1,00,08,Ca,ıo, 
F8,EE,92,C1,00,6E,AE,S2, 
C1,F0,38,20,C6,92,n9,20, 
20,D2,FF,EE,33,C1,EE,33, 
C1,CA,DO,F2,AE,93,C1,E®, 
07,90,10,R9,20,20,D2,FF, 
38,AD,933,C1,E9,06,8D,33, 
C1,B0,E9,290,C1,92,AE,33, 
C1,F0,08,49,80,20,D2,FF, 
CA,DO,FA,A9,08,8D,8E,C1, 
A2,00,BE,8F,C1,8E,S2,C1, 
8E,33,C1,1E,FB,C1,30,09, 
BD,07,C2,0D,8F,C1,8D,8F, 
C1,EB,EC,30,C1,D8,EC,AD, 
8F,C1,09,80,20,D2,FF,CE, 
8E,C1,D0,04,18,A5,FA,69, 
08,85, FA,90,02,E6,FB,CE, 
91,C1,F0,0D,38,AD,9D,C1, 
ED,38,C1,80,3D,C1,4C,E2, 
91,n9,0D,20,D2,FF,AC,SD, 
C1,C0,C5,30,0R,20,C6,32, 
68,8D,A6,C1,4C,CC,FF,C®, 
C3,D0,05,A9,04,80,30,C1, 
4C,C9,31,49,08,4C,D2,FF, 
A9,0F,D0,F9,20,47,88,20, 
C9,FF,A9,00,A0,04,85S,Fn, 
84, FB,A2,19,A0,00,Bl,FA,| 
80,90,C1,29,3F,0E,30,C1, 
2C,90,C1,10,02,09,80,70, 
02,09,40,20,02,FF,C8,Co, 
28,D0,E3,98,18,65,FA,85, 
FA,30,02,E6,FB,A9,0D,20, 
D2,FF,20,1A,93,F0,05,Ca, 
DO,CA,F0,05,49,0D,20,D2, 
FF,4C,CC,FF,AD,80,02,C3, 
01,F0,F9,4C,ED,F6,20,SE£, 
B7,E0,19,B0,13,A0,00,20, 
PB,81,86,FA,84,FB,A9,20, 


WWW HOMESSMRUTERWORLE TOM 


DATA AB,27,31,FA,88,10,FB,68, 22 
DATA 4C,48,B2,A9,00,85,C6,68, EE 
DATA 20,94,8E,20,13,A6,B8,03, 14 
DATA 4C,E3,A8,18,A5,5F,63,04, Au 
DATA 85,41,A5,60,69,00,85,42, 34 
DATA 60,A93,00,A6,CB,E0,07,B0, 54 
DATA 13,E8,83,90,0F,CA,CA,CA, ED 
DATA BD,F7,C1,AA,AD,BE,02,4A, BS 
DATA 90,01,E8,8A,4C,26,83,20, 75 
DATA SE,B7,CA,30,BB,A8,13,A3, 9C 


DATA 7F,E®O,04,B8,B3,78,E®,02, 2C 
DATA 90,04,A9,BF,CA,CA,E0,00, 55 
DATA F0,01,C8,8C,AA,93,8D,08, CE 
DATA DC,29,C0,8D,202,DCE,A2,00, CE 
DATA CA,DO,FD,AD,28,04,58,8D, “42 
DATA 8F,C1,AS,FF,8D,02,DC,60, 7F 
DATA 28,FA,AE,20,7D0,93,20,F7, C8 
DATA AE,AD,8F,C1,4C,26,83,20, 58 
DATA CB,80,49,FF,2D,83,D0D,80D, OF 
DATA 03,DD,60,20,CB,80,02D,23, EC 
DATA DD,4C,CD,93,28,CB,80,0D, 93 
DATA 21,DD,8D0,01,D0DD,60,20,CB, B2 
DATA 80,49,FF,2ED,01,DD,4C,E®, 39 
DATA 93,20,EB,B7,86,24,A5,15, SB 
DATA C3,02,B0,3E,0A,0A,0A,0Rr, 38 
DATA 0A,85,23,A5,14,48,4A,4A, DO 
DATA 4A,18,65,23,65,D3,48,A8, AG 
DATA CS,D3,F8,13,C9,27,90,02, FD 
DATA AB,27,20,24,EA,A9,AB,20, 35 
DATA 1E,EA,88,C4,D3,10,F3,68, “46 


DATA AB,58,C09,28,B0,0B,29,07, 3E 
DATA AA,BD,®E,C2,AB,24,20,1E, BE 
DATA EA,50,4C,48,B2,20,EB,B7, 52 
DATA AS,15,D0@,F6,86,24,n5,14, SC 
DATA 4a,4n,4n,85,23,A5,14,29, 2F 
DATA 07,85,25,45,D1,18,65,03, 4D 
DATA 85,FD,AS,D2,69,00,85,FE, 4B 
DATA AD,00,R6,23,F0,20,20,53, 7E 
DAIA 34,A9,A0,31,FD,AS,24,91, ES 
DATA F3.A5.FD,38,E9,28,85,FD, 5A 


DATA B0,08,C6,FE,AS,FE,C9,04, DE 
DATA 39,12,C6,23,08,E0,20,33, 3D 
DATA 94,46,25,BD,16,C2,31,FD, 3F 
DATA AS,24,91,F3,60,A5,FD,85, 52 
DATA F3,AS,FE,4C,2A,EA,290,6B, FS 
DATA CA,BA,F®,02,R9,80,8D,8n, 59 
DATA 02,68,A5,06,4C,26,83,45, 75 
DATA D3,4C,26,83,20,6B,CA,8A, IF 
DAIA F8,05,A9,00,85,CC,60,A6, 06 
DATA CF,DO,FC,A9,201,D8,FS,20, 58 
DATA E4,FF,AA,FO,FA,4C,26,83, F@ 
DATA 20,FD,AE,20,9E,87,E0,28, 50 
DATA 99,E4,4C,48,B2,20,9E,B7, 29 
DATA E0,19,B0,F6,BE,8E,C1,20, 21 
DATA CE,94,8E,9D,C1,28,CE,34, 05 
DATA EB,8E,8F,C1,AE,BE,C1,NO, 68 
DATA 00,20,2B,81,86,FA,84,FB, A® 
DATA AC,SD,C1,B1,FA,49,80,91, BE 
DATA FA,C8,CC,8F,C1,DO,F4,60, F3 
DATA 20,FA,AE,20,9E,AD,20,8F, 37 
DATA AD,AS,64,48,A5,65,48,20, BC 
DATA FD,AE,20,9E,AD,20,13,B6, 4A 
DATA FO,64,85,04,86,FB,84, FC, 1F 
DATA 68,AB,68,20,An,B6E,F0,56, 96 
DATA 85,03,86,FD,84,FE,N2,00, 33 
DATA A3,2C,20,AF,88,90,07,20, CE 
DATA 9E,B7,8R,F@,41,CN,86,06, 79 
DATA 20,F7,AE,A5,03,38,ES,04, DF 
DATA 30,28,69,00,85,05,45,06, EF 
DATA 18,65,FD,85,FD,930,02,E65, B4 
DATA FE,A®,00,B1,FB,D1,FD,Doe, 04 
DATA 0B,C8,C4,04,90,F5,A4,26, 3C 
DATA CB,4C,A2,B3,E6,06,C6,b5, on 


FOR A-2049 TO 7824 STEP 8: 14007 
S=-2:[C=0:FOR B=-8 TO 7:G60SUB 
620040 


SASFHFLE-EIE=52 2553542555 5034 


AND 255:POKE A+B,H+L:NEXT 


Basic- 


Erweiterung 


B:G60SUB 69049 62059 L=ASE CHS+"X”)-48: IF LO 3198 
69028 F$="PRUEFSUNME DK”: IF S<> 56393 DR L>22 THEN 60988 
H+L THEN F$="ERVSI 60268 IF L<10 THEN RETURN 1044 
PRUEFSUMMENFEHLER": F=F+1 60878 L-L-7:1IF L>3 THEN RETURN 1334 
600838 GOSUB 69090:NEXT A:PRINT ” 2267 62089 FS=-"ERUSIEINGABEFEHLER”:L=- 24560 
EDOWNI"F”FEHLER”: END 8:F=F+1 
69949 READ HS:G60SUB 60950:H=L* 2715 60858 PRINT "ZEILE" PEEK (641)* evYecb 
16:H$=MID$S CH$,2) 2S6+PEEK (63)F$: RETURN 


Kombinierter Hexdump-Basiclader von User-Basic, Teil I 


ı1E31 18 DATA D0,04,A0,00,F0,F3,E6,FD, 50 2031 658 DATA ED,10,11,29,7F,20,D2,FF, F6& 
„ 1E393 28 DATA DO,DF,E6,FE,DO,DB,4C,48, D2 2039 . 6560 DATA 8C,BE,C1,20,E7,CB,AC,BE, DB 
1EA1 38 DATA B2,20,39,95.20,6B,CA,8E, 86 eoRl 670 DATA C1,C8.00,E3,20,02,FF,CA, 63 
i 1EAS 48 DATA 12,89,60,AD,9E,DC,09,80, 02 eoAS 5689 DATA C8,D9,E2,28,E4,FF,AA,F®, SB 
| 2EBl S® DATA 8D,9E,DC,AD,8F,DC,23,7F, 8B EOB1 86508 DATA FA,60,20,FA,AE,20,DE,CS, 66 
1EB3 60 DAIA 8D,0F,DC,60,20.39,935,20, FS 20B93 708 DATA 28,F7,AE,20,20,C5,20,F3, 4C 
1ECc1 78 DATA SE,AD,20,A3,B6,C9,06,00, 32 2oc1 710 DATA C4,AD,00,B1,FC,48,20,E6, 61 
1EC9 82 DATA D5,R0,00,B1,22,38,E3,30, 27 20C9 27208 DATA C4H,68,2D,9F,C1,F8,02,A9, 15 
1ED1 98 DATA C9,03,B0,Ch,9A,0A,OA,OA,. AC eeD1 7308 DATA 01,4C,26,83,20,FA,AE,AS, 84 
1lED3 108 DATA 80,90,C1,C8,B1,22,38,E9, C7 2003 748 DATA 00,80,8E,C1,20,03,80,2D, Ei 
1EE1 118 DATA 30,C9,0R,20,8B9,0D,90,C1, 49 EOEI 7560 DATA 01,DD,4C,26,83,52,45,50, 71 
1EE93 128 DATA D0,02,n9,932,C9,24,B®d,AE, 8A 2BES 768 DATA 45,41,D4,55,4E,54,49,CC, FA 
1EFi 130 DATA C9,13,30,07,38,F8,E9,12, SS e0oFl 778 DATA 43,4F,4C,4F,D2,41,55,54, 83 
1EF9 140 DATA DB,09,80,8D0,08,DC,20,17, FA 2OF3 788 DATA CF ,46,49,4C,CC,53,57,41, 14 
ı1Fo1 150 DATA 96,8D,0A,DC,20,17,36,8D, “4A 2101 7908 DATA D9,43,41,54,41,4C,4F,C7, F7 
1F03 160 DATA 09,D0C,R9,00,80,08,DC,20, 16 21093 6800 DATA 41,D4,50,41,49,4E,D4,49, 02 
ıF1l 170 DATA CE,34,8E,3D0,C1,20,CE,94, 05 ellı 810 DATA 4HE,CB,48,49,52,45,D3,4F, 13 
ı1F19 188 DATA EO,19,80,82,AC,3D,C1,20, A4 2119 822 DATA 46,C6,43,4C,45,41,D2,50, FD 
ıF2l 190 DATA 2B,81,8E,18,80,8C,19,80, AD 2121 - 830 DATA 43,4F,CC,53,45,D4,49,4E, D9 
ıiFE93 2088 DATA 60,C8,51,22,38,E93,30,C3, DE 2123 840 DATA D6,4C,49,4E,C5,46,52,41, 14 
ıF3l 210 DATA 06,80,15,0A,0R,0n,2A,8D, DF 2131 850 DATA 4D,C5,42,4F,D8,54,45,58, EC 
ıF33 228 DATA SD,C1,C8,B1,22,38,E9,30, 36 2139 860 DATA D4,43,52,45,41,54,C5,53, FC 
ı1F4Y1 230 DATA C9,0A,60,04,0D,30,C1,60, 3B e1ı41 870 DATA 50,52,49,54,C5,4D,4F,56, 64 
1F49 240 DATA 4C,48,B2.20,06,A9,4C,FB, 44 2149  BE0 DAIA CS,4D,55,4C,54,C9,45,58, F9 
ıFS1ı 2508 DAIA AB,AS,7A,AG,7B,85,FA,86, 41 eısl 839 DATA 54,45,4E,C4,56,4F,CC,57, 15 
‘ ıF5S3 268 DATA FB,AD,00,C8,B1,FA,F®,04, 36 2159 9980 DATA 41,56,C5,45,4E,D6,50,55, DE 
ıF61 278 DATA C9,3A,D0,F7,8C,3D0,C1,A5, 72 2161 910 DATA 4C,D3,50,41,55,53,C5,50, FF 
IF69 288 DAIA 2B,A4,2C,85,22,84,23,18. D9 21693 922 DATA 4C,41,D9,4D,45,CD,48,45, 12 
ı1F7l 2908 DATA AB,01,81,22,00,03,4C,E3, 62 2171 938 DATA 4C,D9,49,4E,50,4F,52,D4, F7 
ıF?73 300 DATA AB,AB,04,B1,22,C9,CD,D®, B2 21793 940 DATA 4F,55,54,50,4F,52,D4,42, BD 
1F8l 318 DATA 3F,C8,B1,22,C9,E8,D00,38, 7F 2181 350 DATA 49,54,4F,CE,42,49,54,4F, 75 
1iF88 328 DATA CB,Bl,22,F0,04,C9,3A,D®, F® 2189 9608 DATA 46,C06,53,43,52,4F,CE,53, ®E 
ıFg1 338 DATA F7,98,38,E9,06,CD0,3D,C1ı, C4 2191 978 DAIA 43,52,4F,46,C6,44,55,4D, 84 
ıFS3 ° 340 DATA D0,26,18,15,22,69,06,85, 5B 2199 980 DATA D9,43,48,41,4E,47,C5,54, ®B 
ıFAlL 3508 DATA 14,45,23,59,00,85,15,n0, 1B » eZlAi 992 DATA S2,41,4E,D3,44,49,53,CB, 10 
IFA9S 3608 DATA 00,B1,14,D1,FA,D8,11,C8, 97 2Z1A9 1098 DATA 4F,4C,C4,53,43,52,4F,4C, 68 
1FB1 378 DATA CE,SD,C1,DO,F4,A5,14,A4, El 21Bl' 1018 DATA CC,53,43,52,45,45,CE,53, E4 
ıFB3 388 DATA 15,85,7A,84,7B,4C,39,96, 53 21B9 1928 DATA 43,52,44,45,CC,44,45,53, 6A 
ıIFC1 3938 DATA AB,00,81,22,AA,C8,Bl,22, 3F ZICı 1038 DATA 49,47,CE,4E,4F,4B,45,D9, F2 
IFC9 H408® DATA 85,23,86,22,4C,5D,36,45, AS ZICS 10498 DATA 00,1E,C2,3E,C2,F8,85,8B, 2A 
ıFDL 410 DATA 7A,4B,n5,7B,48,20,9E,AD, 74 Z1D1 18S® DATA C2,76,C3,81,C3,B1,C3,17, 4B 
ıFDS3 428 DATA 208,93,B6,C9,298,B0,19,85, 79 21D3 1868 DATA C4,88,C4,84,C2,980,C4,AB, C6 
1FEL 430 DATA FA,C6,FA,38,49,27,E5,FA, 61 Z1E1 1070 DATA C4,CF,C4,FB,C4H,E9,CS,F8, 66 
IFE9S 442 DATA 4A,AB,A6,D6,20,0C0,ES,68, 023 Z1E3 19882 DATA CS,BB,C7,CA,C7,24,C8,6C, 05 
1FF1 4508 DATA 85,7B,68,85,7A,4C,AA,ARA, 1B ZıFi 1092 DATA C8,E3,C9,2E,CA,73,CA,At, FC 
1FF3 45® DATA 4C,48,B2,20,FA,AE,20,3E, 63 ZIF93 11082 DATA CA,B4,CA,1A,CB,21,CB,3A, FF 
2001 470 DATA B7,E0,07,E0,F3,BD,10,88, F5 P201 11108 DATA CB,66,CB,A1,CB,A7,CB,44, 39 
20083 480 DATA 48,20,F7,AE,68,4C,26,83, 38 2209 1122 DATA 80,62,97,C5,33,01,93,DA, 6B 
coll 499 DATA 20,06,A3,A5,2B,A6,2C,85, 4B 2211 1138 DATA 93,E4,33,E8,80,68,81,67, BD 
2219 S0® DATA FA,86,FB,88,392,03,8C,3D, FC 2219 1140 DATA 83,08,86,4F,84,3B,86,82, FE 
2Ze21 518 DAIA C1,A0,01,B1,FA,D8,03,4C, 53 P221 1158 DATA 84,C0,84,7B,86,EE,86,0B, El 
20239 S2E9 DATA 39,36,18,A5,FRA,69,04,85, 27 22293 1168 DATA 87,41,33,41,43,54,49,56, 7A 
2031 530 DATA 14,A5S,FB,69,00,85,15,A@, F2 2231 1178 DATA C5,52,45,4C,46,49,4C,C05, F® 
Pe393 540 DATA FF,C8,B1,14,D8,9F,AR0,00, 33 2233 1189 DATA 52,45,43,4F,52,C4H,46,49, BD 
2041 S50 DAIA Bl,FA,AA,C8,B1,FA,8S,FB, DB 2241 1189 DATA 4C,C5,53,49,5A,C5,55,53, 29 
20843 SE2 DAIR B6,FA,4C,0F,37,CC,SD,C1, 70 2243 1208 DATA 49,4E,C7,45,4C,40,49,58, 76 
5 Pesı S78 DATA D8,15,01,74,D8,15,R0,02, 63 2251 1218 DATA 53,C65,43,49,52,43,4C,C5, 1F 
20859 588 DATA B1,FA,An,CB,Bl,FA,20,CD, Au 22593 12208 DATA 56,45,4B,54,4F,D2,47,52, 7B 
2061’ 590 DATA BD,20,E7,CB,4C,20,97,D1, SE 2261 - 1230 DATA 41,53.06,47,52,41,4C,C4, 16 
2Bo63 560P DAIR 7A,F®O,CE,E6,14,D2,C8,E&, 39 2263 1248 DATA 44,45,CC,52,45,4E,55,CD, FB 
2071 612 DAIA 15,4C,25,97,R9,0D,28,D2, 41 2271 1258 DATA 4D,45,52,47,C5,44,4F,4B, 38 
2073 629 DAIA FF,A9,CB,8D,5D,C1,EE,SD, C® 2273 1268 DAIA C5,44,52,41,07,48,43,4F, 14 
> P881 6308 DATA C1,AD,3D,C1,C9S,00,B8,23, 76 2281 1278 DAIA 59,09,43,4F,50,D3;,45,52, D6 
2083 642 DATA 20,66,C1,R8,00,B1,FA,Fo. 34 2283 1288 DAIA 41,53,C5,52,45,53,45,D4, C4 


136 &XUD Sonderheft 2 
WWW MOMECOMPUTERWORLD: COM 


2293 
eeAl 
2ERI 
22B1l 
e2B3 
e2cl 
2209 
22D1 
2203 
geeEL 


e2E3 
eeFl 
BerRs 
2301 
2303 
e3all 
Ze he 
2321 
2323 
2331 
2333 
e341 
2349 
e35l 
2359 
e361 
2369 
2371 
2379 
2381 
2383 
2331 
2333 
e3rl 
2e3A3 
e3El 
23B93 
zes 
e3c9 
2301 
e3D3 
e3E1 
23E9 
e3Fi 
23F9 
e4o1 
2409 
e411 
2419 
een 
2429 
2431 
e439 
ey4l 
2449 
e451l 
2459 
e4H6Ll 
2463 
e471 
2473 
e4Bl 
2483 
e4s9l 
e493 
e4aAl 
e4A3 
e4Bil 
24B93 
e4Cc1 
24C9 
e4D1 
e4D3 
EYE 
e4E9 
Bar 
e4F3 


13900 
1318 
1328 
1338 
1348 
1350 
1360 
1370 
13808 
1398 


1400 
1410 
1428 
1430 
1440 

459 
1460 
i478 
1480 
1490 
1598 
1510 
1528 
1538 
1549 
1550 
1560 
1570 
1588 
1598 
1608 
1610 
1620 
1630 
1640 
1650 
1660 
1678 
1688 
1698 
1708 
1710 
1720 
1738 
1748 
1750 
1760 
1770 
1780 
1739 
1809 
1810 
1820 
1830 
1848 
1850 
1860 
1870 
1880 
1890 
1908 
1910 
1920 
1930 
1940 
1950 
1360 
1970 
1980 
1998 
2000 
2010 
2020 
2030 
2940 
2050 
2060 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
Data 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIn 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Basic- 


Erweiterung 


S®ß,4C,4F,54,D6,41,472,41 


4B,45,D9,590,4C,4F,54,CB, 


’ 


49, CE,43,55,52,53,4F,D2, 


52,45,56,45,52,D3,54,49 
4D,C5,43;4C,4FY 43, CB;4C 


. 


F1,He7 HS, CE 43 MZHEREC, 


43,45,4E,54,52,C5, 46,49 
YE,C4H,54,41,42,4C,C5,46 


45,54,43,C8,4D,49,58,4F, 


46,C6,4D,49,D8,46,41,53 


D4,53,4C,4F,D7,50,55,53, 


C8,46,4C,41,53,C8,4E,4F, 
46,%3C,41,53,C8,42,4C,49, 
YE,CB,4E,4F,42,430,49,4E, 
CB,4F,55,D4,54,55,S2,4E, 
3F:, 46,66, S47557Se/CcE}44; 
49,53,59,4F,53),C5,4C, 49, 
4E,50,55,04,53,59,41,43, 
C5,00,51,8C,52,88,BC,88, 
ED,88,2D0,89,98,89,18,88B, 
32,8C,5E,8D,3D,8E,7A,BE, 
SF,BE,OA,BF,ER,S8,01,91, 
33,31,A3,91,CA,92,24,33, 
45,53,5B,87,EF,933,3B,94, 
SC,S4,B2,94,DB,34,AA,35, 
8F,S5,39,96,3F,96,BD,S6, 
FE,96,E7,EB,B1,9E,35,SEC, 
DE,SB,42,9C,50,9C,5F,StC, 
FS,SC,14,9D,1F,9D,3A,SD, 
3E,SD,SD,SD,88,3D,A1,3D, 
ED,SD,A3,3E,49,52,51,4F, 
46,C6,44,4C,4F,41,C4,4D, 


4C,4F,41,04,52,45,59,4C, 
41,43,65,53,54,41,54,55, 
D3,00,9C,3F,3F,3F,45,9F, 
B2,39F,DD, 3F.43, 48,45,43, 


CB,S4,45,53.04 52.41 Cu. 
44,45,45,CB,46,55,4E,C3, 
5@ß,4F,D4,52,4F,D7,43,4F, 
4C,55,4D,CE,53,54,41,D9, 
5®,4C,41,43,C5,49,4E,46, 
CF,4D,49,CE,4D,41,D8,50, 
s2,45,53,03,54,50,4F,D4, 
13,43, 47, CE 46 SE 
48,45,58,A4,80,C2,37,AD, 
37,19,8E,19,31,5F,93,B6, 
33,AB,34,AD,34,C05,94,BE, 
95,E9,96,CC,9B,B9,9B,37, 
9SC,BE,3C,25,9F,4B,9F,64, 
SF,AG,2F,AS,30,86,5F,85, 
60,0C5,32,D0,04,E4,31,FO®, 
1D,A8,80,B1,5F,C8,C5,45, 
D2,06,A5,46,D1,5F,F®,11, 
C8,B1,5F,18,65,5F,AA,CB, 
B1,5F,65,60,90,07,4C,08, 
AF,CB,18,B1,5F,65,5F,85, 


26,C8,B1,5F,65,60,85,27, 
C8,B1,5F,20,96,B1,85,5F, 
84,60,24,0E,30,24,10,09, 
28,5B,BC,10,07,A5,5F,A4, 


60,20.R2,BB.1B.A5.,5F.89. 
05,85,5F,90,02,E6,60,A4, 
60,C5,26,009,E3,C4,27,D0, 
DF,60,A0,08,B1,5F,An,CB, 


B1,5F,85,15,86,14,18,A5S, 
SF,69,02,85,5F,90,02,E6, 
690,C5,26,D9,00,AS,60,C5, 
27,D00,07,A5S,14,A4,15,4C, 


91,83,AB,00,B1.SF.cs. 14. 
D8,807,C8,B1,5F,ES,15,F®, 
D5,A9,01,90,02,A9,FF,30, 
C1,10,CB,20,D5,9B,A9,1®, 
AB,30,8D0D,59,9B,8C,B5,SB, 
8D,B7,3B,4C,07,3B,20,D5, 
SB,A9,30,A9,10,D9,EB,22, 
FA,AE,20,8B,BO,4C,F7,RE, 
20,51,8C,20,6B,CA,8A,D®, 
10,A9,AB,A2,C4H,80,B2,81, 


2501 
2509 
e511 
2519 
e521 
e523 
2531 
2539 
2541 
2549 
2551 
2559 


2s61 


2569 
2571 

2579 
e581 

2583 
2591 

2599 
esAl 

e5AS 
e5B1 

e5BS 
2SE1 

2e5c9 
espl 

25D3 
ESEIl 

e5SES 
esFl 
eSF3 
2EB1 
2503 
2611 
2619 
ebel 
2623 
e631 
2633 
e641 
2643 
2651 
2659 
2661 
265693 
2671 
2679 
2681 
e6B3 
2691 
26993 
26A1 
2e6A9 
e6Bi1 
2e6BS 
[=je98 
25C9 
2601 
2609 
EBEL 
26ESI 
E6F1 
SEF3 
2791 
2703 
2711 
2719 
e7e1 

2729 
2731 
0733 
2741 
27493 
2751 
2759 
2761 

2763 


WWWHOMECOMPUTERWORLD.ZOM 


2070 
2088 
2030 
2199 
e1l® 
2128 
2138 
2140 
2150 
2160 
2179 
2180 
2198 
2208 
2210 
2228 
22308 
2240 
2259 
2260 
2270 
2289 
2230 
2308 
2310 
2329 
2338 
2340 
2359 
2368 
2370 
2380 
2398 
2408 
2418 
24208 
2430 
2448 
2458 
2458 
2470 
2488 
2430 
2598 
2518 
2528 
2538 
2549 
2558 
2568 
2578 
2588 
2530 
2600 
2610 
26208 
2630 
2640 
2650 
2662 
2670 
2680 
2630 


2700 
2710 
27208 
2739 
2740 
2750 
2768 
2770 
2788 
2798 
2808 
2810 
2828 
2830 
[1216] 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


8E,B3,81,A9,308,A2,C4,D9, 
OE,A9,98,A2,C4,8D,B2,81, 
BE,B3, 81,#9, AB,A2,CH, BD, 
A3,81,8E,AA,81,20,FD,AE, 
©20,3E,B7,8E,1A,80,8E,12,' 
08,22, FD,AE,28,9E,B7,8£E, 
18,80,78,AD,11,00,29,7F, 
8D,11,D0,A9,81,10,01,8D, 
1A,D2,8C,13,80,58,60,78, 
AS,00,AB,F@,F2,4D,2D,57, 
07,1C,01,08,A9,0F,8D,41, 


3C,A9,07,A2,3B,AB.aC.4C. 
S0,86,A9,3A,D8,F0,20,FD, 
AE,28,9E,B7,E0,19,B9,50D, 
60,20,13,E5S,8A,48,98,48, 
20,57,9C,86,FA,20,54,9C, 


86,FB,A6,FA,E4,FB,FO,17, 
B®O,E6,CA,EB,20,F0,ES,E4, 
FB,F®,0C,BD,F1,EC,85, ac, 
BS,DA,20,C8,E9,30,EC,20, 


FF,E9,6B,AB,68,AM.4C.0C. 
ES,28,9E,AD,20,43,B6,8D, 
SD,C1,86,FA,B4,FB,29,2C, 
AB,28,E4,FF,AO,00,D1,Fn, 
F2,08,C8,CC,9D,C1,D9,F6, 
F®O,EC,4C,26,83,4C,48,B2, 
20,FA,AE,20,3E,B7,BE,30, 
C1,28,808,93,20,FD,AE,20, 
SE,B7,20,85,ECB,AD,BF,C1, 


80,31,C1,28,F7,AE,AE,38, 
C1,20,80,93,AD,8F,Cı,CD, 
91,C1,F0,06,90,08,A9,01, 
D,06,A93,00,F0,02,A9,FF, 


4C.3C,BC,22,EB.Ca.BE Ic. 
89,20,E8,CA,8E,1D,80,20- 
18,5D,8D,1F,88,A3,01,80, 
1E,80,8D,14,80,60,A9,00, 
FO,F8,20,F1,B7,BA,F®,SD, 
69,20,EB,CA,BE,20.80,20. 
E8,Ch,8E,21,80,20,18,30, 
8D,23,80,A9,01,8D,22,80. 
8D,15,80,60,49,00,F®,F8, 
20,9E,AD,20,n3,B6,8D,6£, 
C1,86,FA,84,FB,20,F1,B7, 
BE,BF,C1,AD,86,02,48,20, 
E8,CA,BE,86,02,49,00,8D, 
39,C1,EE,BE,C1,CE,8B.C1, 
08,05,68,8D,86,02,50, AL, 
8F,C1,F0,08,N2,00,CA,D®, 
FD,88,00,FA,AC,38,C1,B1, 
FA,20,D2,FF,EE,30,C1,4C, 
63,90,20,EB,CA,BE,26,80, 


20,18,3D,8E,24,80,8E,25, 


80,A9,01,80,16,80,60,#3, 
00,F0,F8,C9,82,00,21,20, 
73,00,00,04,A0,09,F0,03, 
20,8B,B0,85,49,84,4A,20, 
BA,A3,F0,03,4C,30,AD,8n, 
18,69, 0C,AA,SA,4C,AE,A7, 
£3,SC,F8,10,C9,8E,F0,03, 
4C,08,AF,A2,FF,86,49,20, 
BA,A3,9A,C9,8D0,F0,03,4C, 
EO,AB,En,BA,18,69,07,An, 
eC,A2,FA,SA,6C,08,03,20, 
73,00,C9,22,00,0B,20,ED, 
AE,A9,2C,20,FF,AE,20,21, 


AB,20.A6,B3.20.9F.9E.20. 


7E,SE,A3,A4,20,D2,FF,20, 
4E,SE,CS,14,F0,16,C9,0D, 
F@,1F,EC,8E,C1,F®,F@,9D, 
02,02,E8,20,6C,3SE,20,D2, 
FF,4C,88,9E,8N,F8,E0,20, 
6C,SE,20,6C,3E,CA,4C,08, 
SE,22,6C,9E,20,D2,FF,Ag, 
22,9D,08,02,R0,02,AA,20, 
83,B4,20,AD,SF,4C,DA,ng, 
8E,SD,C1,20,E4,FF,C9,3D, 


E05RI2E9: 1D.Fo.FS.cs.11. 
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95 
EB 
F3 
BB 
Be 
Ag 
53 
FB 
D3 
DB 
D1 
nie: 
3C 
BE 
08 
70 
ES 
E2 
39 
Bö 
DS 
sc 
E6 


E3 
93 


‘E7 


33 
3F 
6E 
083 
SF 
ES 
088 
3E 
4E 
35 
E® 
A7 
BE 
65 
5B 
37 
FB 
er 
BF 
F3 
EF 
DD 
So 
76 
7F 
DE 
24 


993 
F3 
cA 
Bo 
12 
66 
26 
F2 
öD 
74 
al 
46 
61 
7D 
12 
FS 
Se 
E2 
77 
9B 
Fo 
89 
cc 
AB 
55 


> 


2771 
2779 
2781 
27889 
2731 
27393 
e7ral 
E7A3 
27Bl 
27B3 
ACH 
27C9 
27D1 
2703 
ee 
e7E3 
E7Fl 
e7F93 
2801 
2803 
e81l 
2819 
eB21 
2823 
2831 


2839 
eB4l 
2843 
eBsl 
2859 
eB61 
2869 
2871 
2879 
2881 


2883 
e831 
2893 
eBAl 
eBA3 
2BBl 
2BBS 
2BC1 
2809 
e8D1 
2809 
EBEL 
2BE3 
EBFl 
EBF9 
2301 
2909 
esıl 
2919 
2321 
2323 
2331 
2939 
Est 
2949 
es5l 
23593 
2361 
2363 
2971 


2973 
2381 
2989 
2931 
2999 
egal 
EEGR) 
2sBl 
2383 
2sc1 
2ac9 
2sp1 

2908 


2850 
28608 
2870 
2888 
2838 
2300 
2910 
29208 
2930 
2340 
2958 
2360 
2370 
29388 
29308 


3898 
3218 
3920 
3038 
3040 
3959 
3060 
39070 
3088 
3939 


3100 
3118 
3128 
3138 
3140 
3158 
3168 
3170 
3180 
3190 


3208 
3210 
3220 
32398 
324o 
3258 
32698 
3270 
3280 
3230 
3308 
331® 
33208 
3330 
3340 
3350 
3368 
337® 
3388 
3398 


3490 
3418 
2428 
3438 
3440 
3450 
3468 
3478 
3488 
3498 


3508 
3518 
3528 
3530 
3540 
3558 
3568 
3578 
3589 
3539 
36008 
3618 
3628 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 


DATA. 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Basic- 


Erweiterung 


FO,F1,C9,91,F0,ED,C9,00, 
FO,ES,AE,3D,C1,60,48,R9, 
93D,20,D2,FF,A9,29,20,D2, 
FF,A9,SD,20,02,FF,58,60, 
20,18,3D,E0,51,30,03,4C, 
48,B2,8E,8E,C1,49,20,20, 
D2,FF,CA,DO,FA,AE,8E,C1, 
AS,30,20,D2,FF,CA,D®,FA, 
60,20,8B,B0,85,49,84,4A, 
4C,BF,AD,28,3E,B7,BA,F®, 
D6,D0,07,20,A6,83,20,SE, 
AD,20,A3,86,80,8F,C1,86, 
FA,84,FB,20,7E,3E,20,FD, 
AE,20,3F,9E,A2,00,A3,2D, 
20,D2,FF,20,4E,9E,C3,14, 
FO,24,C9,0D,F®,2D,EC,SE, 
C1,F0,F0,A0,00,D1,Fn,F®, 
08,C8,CC,8F,C1,D0,F6,F®, 
E2,90,00,02,E8,20,6C,SE, 
20.D2,FF,4C,CC,3E,BA,FO, 
D2,20,6C,9E,20,6C,3E,Ca, 
4C,CC,9E,4C,37,9E,AB,00, 
8C,12,80,8C,14,80,8C,15, 
80,8C,16,80,20,87,81,A0, 
00,20,70,81,29,35,9C,60, 
AD,86,02,4C,26,83,A2,08, 
AB,01,20,BA,FF,20,9E,AD, 
20,13,B6,20,BD,FF,A9,00, 
60,20,2C,9F,4C,71,E1,20, 
2C,9F,4C,DS,FF,20,F1,RE, 
AS5,66,48,19,00,85,66,20, 
0C,BC,28,CC,BC,20,53,B8, 
68,85,66,4C,79,00,20,F1, 
AE,20,8D,AD,28,F7,B7,A9, 
02,R6,15,F0,01,0N,20,7D, 
E4,NB,00,45,15,F0,03,20, 
BE,SF,AS,14,20,8E,9F,20, 
CA,B4,20,AD,9F,4C,79,00, 
48,4n,4A,4n,4A,20,A3,8F, 
91,62,C8,68,29,0F,20,43, 
9F,931,62,C8,60,18,569,F6, 
90,02,69,06,69,34,60,49, 
FF,85,0D,60,20,3E,8B7,8E, 
8E,C1,20,F1,87,8E,8F,Cl, 
A9,04,N0,00,85,FB,84, FR, 
A2,04,Bl,FA,CD,8E,C1,D®, 
05,AD,8F,C1,31,FA,C8,D®, 
F1,E6,FB,CA,D®,EC,60,20, 
9F,SE,20,16,86,A2,03,#8, 
2C,DD,35,02,F0,03,E8,D®, 
F8,49,00,30,35,02,AA,ns, 
38,AQ,02,4C,45,9E,41,44, 
45,52,03,97,19,399,72,3#A, 
SA,3A,B7,38,10,3A,38,3R, 
E3,3NR,20,73,08,C3,CC,39, 
04,C9,CF,90,06,28,73,00, 
4C,E7,A7,80,90,C1,20,66, 
C1,20,73,00,38,E3,CC,OoR, 
A8,B1,FC,8D0,3E,C0,C8,Bl, 
FC,8D,3F,C0,20,73,00,20, 
B1,C3,4C,AE,A7,10,0F,24, 
OF,30,0B,C9,FF,F®,07,C9, 
CC,B0,06,4C,24,A7,4C,F3, 
A6S,8D,3D,C1,20,66,C1,C8, 
B1,5F,38,E9,CB,An,84,49, 
AD,FF,CA,F®,07,C8,Bl,Fa, 
10,FB,30,F6,C8,B1,FA,3®, 
05,20,47,AB,D®,F&6,4C,EF, 
AB,AB,7A,RD,04,84,2F,BD, 
00,02,18,07,C3,FF,F®,3E, 
EB,D®,F4,C9,20,F0,37,85, 
08,C9,22,F0,55,24,0F,70, 
2D,C9,3F,D0,04,A49,39,D0, 
25,C9,39,30,04,C93,3C,30, 
1D,84,71,A0,20,84,0B,58, 
86,7A,CA,CB,E8,BD,00,02, 
38,F3,3E,A8,F®,F5,C9,80, 
D2,2F,05,0B,A4,71,E8,C8, 
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o2 
18 
27 
AD 
3E 
AF 
E6& 
65 
e} 
CB 
32 
B2 
53 
AC 
32 


AB 
5A 
74 
D8 
c3 
08 
OB 
793 
85 
F6 
1A 
D4 
7A 
69 
26 
AD 
DC 
AS 
AS 
1D 


79 
91 
S5 
ec 
e6 
63 
DE 
n2 
F4 
58 


84 
B6 
608 
4A 
86 
E6 
F3 
87 
BB 
6A 
DA 
16 
e4 
FB 
7C 
BE 
6F 
AD 
AB 
FD 
72 
3% 
BI 
AD 
83 
26 
43 
F3 
ES 
EB 
37 
B1 
ED 


2SEL 
2SES 
egFl 
e3F3 
eABIl 
eABS 
eall 
erl9 
erel 
eA29 
er31l 
eA33 
erul 
eA4S 
ersıl 
ens3 
eABIl 
2A6S 
eA7l 
2A79 
eABı 
erRB3 
ers1 
2r33 
SAAL 
SAAS 
erBil 
eARBS 
eRACI 
2AC9 
eRDl 
eAD3 
SREI 
BAES 
eRFl 


-anrFg 


eBol 


2B09 
eBll 
2B13 
eB2l 
eB23 
2B31 
2B33 
eB41l 
eB439 
eB51 
eB53 
eBEIl 
2B69 
eB71 
eB73 
2B8l 
2B83 
2BS1 
2B33 
eBAl 


eBA3 
EBBl 
eBB3 
ebcl 
2BC9 
2BDl 
eBD3 
eBEI1 
eBEI 
eBFl 
eBF3 
ecol 
ec89 
ecıl 
2C19 
ec2l 
ec23 
ec31 
2C33 
ec41 
eC43 


3638 
3640 
3658 
3669 
3678 
3688 
3639 
3708 
3718 
3728 
3738 
3749 
3758 
3768 
3770 
3788 
3738 
3808 
3818 
3828 
3838 
3848 
3850 
3868 
3878 
3888 
3898 
3998 
3918 
39208 
3930 
3948 
3350 
33960 
3970 
3388 
3930 


4900 
4012 
4920 
4038 
4040 
4050 
4060 
4070 
4080 
4030 
4198 
4110 
4128 
4130 
4140 
4150 
4168 
4170 
4180 
4150 


4208 
4219 
4220 
4230 
4240 
4259 
4260 
4279 
4280 
4230 
4308 
4310 
4320 
4333 
4349 
4358 
4360 
4370 
4388 
4398 
44090 


39,FB,01,C3,00,F0,38,38, EB 
ES,3A,F0,084,C9,49,D8,02, E7 
85,0F,38,E9,55,D9,A0,85, 66 
08,BD,00,02,F8,E0,C5,08, 16 
FO,DC,C8,59,FB,21,E8,08, 53 
F@,A6,7A,E6,0B,CB,B3,3D, 3E 
ADB,10,FA,BIS,SE,AB,DQ,BS, ES 
FO,0F,BD,02,02,180,BD,39, B2 
FD,01,C6,7B,A9,FF,85,7A, FB 
68,A93,CB,8D,SD,C1,EE,SD, 22 
C1,AD,3D,C1,C9,D8,930,02, 77 
B®O,EB,20,66,C1,A3,CC,85, ES 
0B,AB,08,B1,FA,D0,02,C8B, 28 
E8,BD,080,02,38,F1,FA,Fd, 7A 
F6,C9,890,00,11,05,0B,48, AD 
E6,71,%44,71,AD,SD,C1,39, DF 
FB,81,68,4C,CC,C0,A6,7A, 4D 
E6,0B,Bl,FA,30,03,C8,08, BS& 
F9,C8,B1,FA,DO,D3,F®,B6G, 1F 
BA,4B,AD,SD,C1,38,E3,CC, F7 
@A,AA,BD,00,C0,85,FA,ED, 34 
81,C0,85,FB,BD,08,C0,85, BB 
FC,BD,89,C0,85,FD,68,AA, CF 
60,00,020,00,00,B4,00,0RA, A3 
01,87,0E,20,20,00,00,00, .89 
00,00,00,00,20,200,04,D0, 34 
00,40,00,00,00,00,00,FF, C2 
EO,00,00,00,20,00,00,00, E® 
00,20,00,00,00,00,20,00, 08 
BDFORIBFRSTADL HF 52,59, ER 
3ArDD,SR SE, HER 87, 52,471, 34 
4B,939,00,55537,52,39,4177)°C1 
42, ,4E,4575373A,00,41,52, 04 
324,41, 293,53, 3#70D, 53,53, 493 
52,49,4E,47,53,3A,80,46, FO 
527)45,45,39,00,37,36,35, 'E2 
34,33,32,31,380,0D,4B,45, 2B 


593,07,01,03,05,00,00,00, 55 
00,00,00,00,80,89,A7,Bn, 21 
93B,801,02,04,08,10,20,40, 70 
20,65,74,75,61,F6,EA,E7, 28 
20,64,6F,79,62,F8,F7,E3, 30 
68,68,A3,03,20,FB,A3,28, 4E 
06,A9,18,98,65,7A,48,A5, 6C 
7B,69,00,48,A5,39,48,A5S, D9 
3A,48,A9,52,48,4C,AE,A7, 4C 
68,68,20,8A,AD,AB,BA,BD, 98 
01,01,C98,52,08,23,38,D0, EB 
17,BD,02,01,85,3A,BD,03, 60 
01,85,393,BD,04,01,85,7B, 06 
BD,05,01,85,7A,4C,AE,A7, 68 


'‚8A,18,69,05,AA,9A,4C,AE, 83 


7,#9,78,85,22,A9,C2,4C, E® 
BELESSOSSHE SF US IETORS CB 
s2,45,50,45,41,D4,20,9E, 08 
B7,BE,86,02,60,68,68,20, EC 
73,00,F0,180,20,EB,B7?,BE, B6 


8D,C1,A5,14,8D0,8B,C1,AS, 7A, 


15,80,8C,C1,AD,02,03,80, 74 
BE,C1,AD,03,03,80,8F,Cl, BB 
A9,BB,80,02,03,A49,C2,8D, 08 
03,03,4C,80,A4,20,C1,C2, 4E 
4C,86,A4,AD,BB,C1,AE,8C, A3 
C1,85,63,86,62,R2,30,38, 31 
20,493,BC,290,0D,BED,A2,20, 34 
BD,01,21,F0,09,3D,00,02,. 38 
20,D2,FF,E8,D0,F2,AD,8B, 66 
C1,18,60,80,C1,80,88,C1, 86 
30,03,EE,8C,C1,49,20,20, ®6 
D2,FF,20,CF,FF,C9,00,F®, 78 
03,4C,69,A5,AD,8B,C1,ED, 71 
8D,C1,80,8B,C1,B0,03,CE, 15 
8C,C1,AD,BE,C1,AC,BF,Cı, CD 
8D,02,03,8C,03,03,4C,76, D8 
AS,4C,48,B2,20,9E,B7,E®, 48 
28,B0,F6,8E,8E,C1,20,FD, DI 
AE,20,3E,B7,E0,19,B0,E9, 02 
BE,8F,C1,20,FD,AE,20,39E, 78 


UNTIL U U ALU a LU LU ZU u ds u 


eCcS1 
eC59 
ec6l 
2C63 
ec7l 
eczs 
ecBl 
2C83 
ec9l 
2c33 
ecAl 
eCA3 
eCcBLl 
eCB3 
eccl 
ecc3 
ecol 
ecD3 
eCEl 
B0E9 
ecFl 
eCF3 
eDol 
2D23 
epil 
2D19 
ebel 
2029 
2D31 
2033 
eD41 
2049 
eD51 
eD53 
eDE1 
EDES 
eD71 
eD73 
eD8l 
2D83 
2031 
2083 
eDAl 
eDA3 
eDBi 
eDB3 
eDC1 
2DCS 
eDD1 
2DD3 


EDEI 


eDE3 
eDFL 
eDF9 
BEOL 
SEBS 
BEIl 
BELS 
BE21 
SE23 
eE3l 
2E33 
eE4l 
2E49 
BESL1 
2ESYI 
[1 3=p8 
DEEI 
SE7L 
eE73 
2EBI1 
2EBS 
SEI 
eES3 
gEAl 
SEA 
SEBI1 
cEB3 
SEEL 
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4410 
4420 
4430 
4440 
4459 
4460 
4479 
4488 
4490 
4508 
4510 
4520 
4539 
4540 
4550 
4560 
4579 
4580 
4590 
4608 
4610 
4620 
4630 
4640 
4658 
4660 
4670 
4580 
4692 
4790 
4718 
4720 
4738 
4748 
4759 
4760 
4770 
4788 
4738 
4800 
4810 
4820 
4830 
4840 
4859 
4858 
4870 
4880 
4830 
4900 
4910 
4920 
4930 
4940 
4958 
4960 
4970 
4980 
4990 
5000 
5010 
5920 
5030 
5040 
5050 
5060 
5070 
5080 
5930 
5100 
5110 
5120 
5130 
5140 
5150 
5168 
5170 
5180 
5198 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Basic- 
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B7,8A,18,6D,8E,C1,C9,28, 46 
580,D7,8E,S80,C1,28,FD,AE, C6 
20,9E,8B7,8A,18,6D,8F,Cı, 23 
C3,19,B8,C5,8E,S1,C1,68, F8 
EE,AO,C1,48,20,AB,C4H,68, 37 
4C,45,A4,28,22,C3,20,FD, 0D 
AE,20,9E,B7,8E,92,C1,68, D1 
A3,00,80,97,C1,20,69,C3, ES 
4C,09,80,28,FA,AE,20,9E, 70 
AD,20,8F,AD,AS,64,85,F7, 3D 
AS,65,85,F8,28,FD,AE,20, 7F 
SE,AD,28,8F,AD,AB,20,Bl, DF 
F7,85,F9,B1,64,91 iF7,AS, DE 
F9,91,64,C8,C0,03,D0,EF, Al 
4C,F7,AE,AS,24,85,FB,A9, SC 
FB,85,BB,A9,00,85,BC,AS, 16 
01,85,67,A93,08,85,BA,A9, IF 
60,85,8B9,20,0D5,F3,AS,Ba, “41 
20,B4,FF,AS,BS,20,96, FF, F6 
A3,00,85,90,R0,03,84,FB, C3 
20,A5,FF,BS,FC,A4,90,D9, OD 
eR,20,AS,FF,A4,38,08,23, 71 
AHM,FB,88,D08,E3,A6,FC,20, 88 
CD,BD,28,A5,FF,A6,99,D®, ‚A4 
12,AA,F®,06,20,D2,FF,4C, 53 
F8,C3,A93,8D,20,D2,FF,A®, 7D 
02,D2,CB,4C,42,F6,4C,48, ®2 
B2,20,FA,AE,20,9E,B7,E®, 36 
28,B90,F3,86,D3,20,FD,AE, E6 
28,93E,B7,E9,19,B0,E7,B6, 24 
DE,20,F7,AE,208,6C,E5,29, 77 
06,49,98,FB,6F,4C,ABd,AA, IF 
20,20,2A,20,2A,20,2A,20, 1E 
20,55,20,53,20,45,20,52, 42 
20,20,2D,20,20,42,280,41, CA 
£0,53,20,49,20,43,20,28, 82 
2A,20,2A,20,2A,020,00,20, ıE 
20,20,20,20,28,28,43,29, 12 
29,31,39,38,35,20,29,42, E3 
59,0.8,48,2E,41,42,45,4E, 49 
44,53,43,38,45,49,4E,0D, 29 
0D0,00,493,01,8D,97,C1,4C, 1F 
7B,C3,#D,11,02,09,22,8D0, AD 
11,08,AD,28,0D,29,FC,8D, ı8 
80,DD,A93,CC,8D0,88,02,AS, SF 
38,8D0,18,0D8,60,A9,1B,8D, 3A 
11,092,49,15,8D,18,D9,A9, 70 
04,8D,88,02,AD,88,0D,03, 7D 
‚03,8D,00,DD,60,84A,30,;03, SE 
EE,AB,C1,20,AB,C4,4C,8B, 96 
E3,20,DA,CB,85,FB,A9,00, 04 
85,FA,A2,20,AB,S1,FA,CB, 55 
D®,FB,E6,FB,CA,D®,F6,60, 5® 
48,R9,37,85,01,58,68,60, 03 
48,A9,30,D0,03,48,A9,31, 33 
78,85,01,68,60,A9,00,8D, B7 
BE,C1,20,9E,B7,8A,29,0F, 937 
8D0,BE,C1,208,FD,AE,20,9E, 78 
\B7,BA,0A,0A,0A,0A,00,BE, AC 
C1,ADd,CC,84,15,A0,00,84, SB 
14,A2,04,91,14,C8,D0,FB, 07 
E6,15,CA,DO,F6,60,AC,SD, 6E 
C1,98,29,F8,85,FE,85,FC, 6B 
AS3,00,85,FD,06,FC,26,FD, 65 
05,FC,26,FD,18,AS,FC,65, 3F 
FE,85,FC,930,02,E6,FD,806, F8 
FC,26,FD,06,FC,26,FD,06, 97 
FC,26,FD,38,29,07,18,65, OF 
FC,85,FC,S0,02,E6,FD,18, E4 
AS,FA,29,F8,65,FC,85,FC, DO 
AS,FB,65,FD,85,FD,18,AD, 07 
A5,C1,65,FD,85,FD,AS,FA, 81 
29,07,49,97,AA,A9,01,CA, SC 
30,03,0A,0D8,FA,8D,3F,Cı, B2 
690,20, FD,AE,20,SE,B7,E®, EB 
04,90,83,4C,48,B2,8E,39E, B2 
E1,A2,FF,8E,A5S,C1,60,20, 54 
eC,C5,AD,SF,C1,A8,00,AE, ES 
SE,C1,D8,05,11,FC,91,FC, 52 


2ECS 
SED 
2EDS3 
2EEI 
SEES 
SEFI 
SEFS 
EFOL 
eF83 
eFll 
eF13 
er2l 
er23 
er31 
erF33 
er4l 
eF4s 
ers1ı 
eF53 
eF61 
eF63 
eF71 
eF73 
eFB1 
2eFB3 
ersl 
eFSs3 
eFAl 
eFA3 
eFBl 
eFBS 
erci 
erFcS 
eFDl 
2FDI 
EFEI 
eFES 
eFF1 
eFF3 
3201 
3883 
3011 
3819 
3921 
3925 
3831 
3839 
3041 
3843 
3051 
3859 
3061 
3059 
3071 
3979 
3081 
3083 
3031 
3993 
30A1 
39A3 
30B1 
3089 
30C1 
30C39 
30D1 
30D3 
30E1 
30E3 
30F1 
30F9 
3101 
3183 
3111 
3119 
3121 
3129 
3131 
3139 


5208 
s21d 
Ss2208 
5238 
s240 
S258 
S2E98 
s270 
5288 
5238 
5308 
5310 
53208 
5338 
5348 
5358 
5368 
5370 
5388 
5330 
5402 
5419 
5420 
5439 
5448 
5458 
5469 
5470 
5480 
5430 
5509 
5518 
5528 
5538 
5549 
5558 
5568 
5578 
S585 
5538 
5698 
5618 
SE208 
5638 
5648 
5559 
5669 
5678 
SE80 
5638 
5708 
5710 
5720 
5730 
5749 
5758 
5760 
5779 
5789 
57908 
58008 
5810 
5820 
5830 
5840 
5852 
5B68 
5879 
58808 
5830 
59308 
5319 
59328 
5339 
5948 
5350 
5368 
5372 
59389 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
nATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


60,E80,01,D9,07,49,FF,31l, 
FC,31,FC,50,E0,02,00,05, 
51,FC,31,FC,60,48,AD,AS, 
C1,49,FF,80,A5,C1,D9,06, 
68,11,FC,91,FC,60,68,60, 
28,1B,C6,8C,90,C1,86,FA, 
85,FB,60,20,DE,CS,20,8F, 
C5,20,F3,C4,20,A5,C5,4C, 
E6,C4,20,DN,CB,85,FD,Ag, 
00,85,FC,20,F3,C4,A2,20, 
98,Bl,FC,49,FF,S1,FC,CB, 
D®,F7,E6,FD,CA,DO,F2,4C, 
E6,C4,4C,48,B2,20,EB,B7, 
EO,C8,BO,F&6,BA,AB,AG,14, 
A5,15,F0,08,C9,02,BQ,En, 
EO,40,BO,E6,60,20,DE,C5, 
20,FD,AE,20,1B,C6,8C,B5, 
C1,8E,A8,C1,80,A9,C1,60, 
AS,FA,4B,AS,FB,48,AD,SD, 
C1,48,AD,AB,C1,48B,AD,AS, 
C1,48,AD,B5S,C1,48,n0,01, 
8C,B4,C1,8C,B1,C1,8C,AF, 
C1,88,8C,B80,C1,8C,B3,C1, 
8C,B2,C1,88,AD,A9,C1,CS, 
FB,30,09,D8,1E,AD,AB,C1, 
CS5,FA,B0,17,38,A5,FA,ED, 
AB,C1,8D,AD,C1,AS,FB,ED, 
AS,C1,8D,AE,C1,8C,B4,C1, 
4C,AA,C6,38,AD,AB,C1,ES, 
FA,8D,AD,C1,AD,A9,C1,ES, 
FB,BD,AE,C1,RD,BS,C1,CD, 
SD,C1,B8,10,38,AD,SD,Cı, 
ED,B5,C1.,8D,AC,C1,8C,Bl, 
E1,4C,C8,C6,ED,SD,C1,8D, 
AC,C1,AD,AE,C1,DB,24,AD, 
AD,C1,CD,AC,C1,B®,1C,AE, 
AC,C1,8D,AC,C1,8E,AD,C1, 
AD,B4,C1,8D,B2,C1,AD,B1, 
E1,8D,E3,C1,C8,8C,8B4,C1, 
SC,Bl,C1,AD,RE,C1ı,4A,8D, 
AB,C1,AD,AD,C1,5A,BD,An, 
E1,4C,8%,C7,AD,B4,C1,30, 
BC,18,65,FA,85,FA,30,1®, 
E6,FB,4C,1E,C7,38,95,Fn, 
ES,01,85,FA,B0,02,C6,FB, 
18,AD,3D,C1,60,53,C1,8D, 
9D,C1,18,AD,AA,C1,6D,AC, 
C1,8D,AA,C1,90,03,EE,AB, 
C1,EE,AF,C1,00,03,EE,B2, 
E1,AD,AB,C1,CD,AE,C1,90, 
43,D8,08,AD,AD,C1,CD,AA, 
C1,B0,39,38,AD,AA,Ci1,ED, 
AD,C1,8D,AA,C1,AD,AB,C1, 
ED,AE,C1,8D,AB,Cı1,AD,B2, 
C1,30,0C,18,65,FA,85,FA, 
S0,10,E6,FB,4C,80,C7,38, 
AS,FA,ES,01,85,FA,Bo,02, 
C6,FB,18,AD,9D0,C1,6D,BLl, 
C1,80,9D,C1,20,A5,C5,AD, 
BdO,C1,CD,AE,C1,90,23,F0, 
02,8B0,08,AD,AD,C1,CD,AF, 
C1,80,17,68,80,B5,C1,68, 
80,A9,C1,68,8D0,A48,C1,68, 
80,30,C1,68,85,FB,68,85, 
FA,60,4C,02,C07,20,33,C6, 
20,8F,C5,20,F3,C4,20,46, 
C6,4C,E6,C4,20,33,C6,20, 
8F,C5,20,F3,C4,A5S,FA,BD, 
97,C1,A5S,FB,8D0,98,C1,AD, 


ES,C1,80,99,C1,AD,SD,C1,. 


8D,3A,C1,8D,BS,C1,20,46, 
C6,RD,393,C1,80,9D,C1,8D, 
B5S,C1,20,46,C6,AD,AB8,C1, 
85,FA,AD,A9,C1,85,FB,AD, 
9A,C1,8D,8D,C1,20,46,C6, 
AD,37,C1,85,FA,8D,AB,C1, 
AD,S8,C1,85,FB,8D,AS,Ec1, 
28,46,C6,4C,E6,C4,20,33, 
E6,280,8F,C5,AC,3D,C1,AD, 
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85,C1,8C,B5,C1,A2,00,C0, 
SD,C1,B0,01,CA,8E,37,C1, 
B80,98,C1,20,F3,C4,20,35, 
E6,AC,97,C1,F0,0C,CE,SD, 
C1,CE,BS,C1,CE,9D,C1,CE, 
PES,C1,EE,SD,Cı,EE,BS,C1, 
AC,SD,C1,CC,98,C1,D®,DE, 
20,46,C6,4C,E6,C4,20,DE, 
CS,20,FD,AE,20,3E,AD,22, 
A3,56,C9,00,F0,ED,BD,BE, 
C1,8E,8F,C1,8C,90,C1,20, 
FD,AE,20,9E,B7,8R,48,20, 
FD,AE,20,9E,57,E0,00,F2, 
0B,E®,01,D00,1D,A2,09,08, 
22,n2,08,8E,39,C1,20,8F. 
C5,66,C3,01,F0,0F,C9,02, 
F0,11,C9,03,F0,13,C3,€4, 
FO,15,4C,48,B2,49,00,A2, 
D2,00,10,n9,00,42,04,DD, 
OA,AS,28,A2,D8,09,04,A9, 
00,A2,DC,8D0,34,C1,8E,S$, 

1,AD,BF,C1,AE,30,C1,85, 
14,86,15,29,F3,C4,A9,20, 
8D,31,C1,80,33,C1,AC,s1, 
C1,B1,14,AN,80,92,C1,38, 
E3,A1,B0,03,CE,33,C1,E2, 
FF,FO,38,18,69,21,90,03, 
EE,33,C1,E0,C0,B0,2C,1B, 
63,40,90,03,EE,33,C1,EO, 
AD,BO,20,18,69,20,90,03, 
EE,93,C1,E0,60,80,14,38, 
E9,20,B0,03,CE,33,C1,E®, 
40,60,08,18,69,40,90,93, 
EE,93,C1,0N,2E,33,C1,0A, 
2PE,93,C1,0N,2E,33,C1,18, 
6D,94,C1,85,BB,AD,33,C1, 
6D,35,C1,85,BC,A9,00,80D, 
93,C1,8D,96,C1,AC,S6,C1, 
B1,58,8D0,98,C1,A9,09,8D, 
97,C1,0E,38,C1,30,08,20, 
CA,C9,50,03,20,AS,C5,CE, 

7,C1,F0,0B,E6,FA,DO,ER, 
E6&,FB,4C,68,C9,B9,'42,EE, 
S6,C1,AC,396,C1,C0,08,F0, 
12,EE.3D,C1,AS,FA,38,ED, 
99,C1,85,FA,B0,BF,CS,FB, 
4C,5B,C9,EE,91,C1.CE,8E, 
C1,F0,1E,AD,39,C1,C9,03, 
D®,0B,18,A5,FN,63,97,85, 
FA,30,02,E6,FB,38,AD,SD, 
C1,E3,07,80,3D,C1,4C,EC. 
C8,4C,69,C8,AD,SD,C1.C3, 
C8,B0,10,A5,FB,F0,0#,C9, 
02,B0,08,AS,FA,C9,40,B0, 
02,18,60,38,60,20,56,Ca, 
BD,BE,C1,8E,8F,C1,20,FD, 
AE,20,9E,B7,BA,AE,BF,Cı, 
3D,27,D8,20,FD,AE,20,3£, 
B7,Bn.AE,8F,C1,3D,F8,97, 
29,68,CH,AD,8E,C1,49,;FF, 
48,2D,1C,D8,E0,00,F0,03, 
2D,8E,C1,8D,1C,D0,20,68, 
CA,68.2D,18,00,E0,29.Fo, 
03,00,8E,C1,8D,1B,D0.60, 
20,79,00,D00,04,A3.00,Fo, 
18,20,56,CA,8D,BE,C1,20, 
68,CA,AD,8E,C1,49,FF,2D, 
15,00,E0,90,F0,03,0D,BE, 
C1,8D,15,D0,60,4C,48B,B2, 
20,9E,8B7,E0,08,BO,F6,5R, 
AB,AS,01,88,30,03,0A,D®, 
FA,68,20,FD,AE,20,9E,B7, 
E8,902,80,E1,60,20.56,Ca, 
BE,8E,C1,8D,8F,C1,20,FD, 
AE,20,EB,B7,AD,8F,C1,43, 
FF,2D,10,D0,A4,15,F0,03, 
080,6F,C1,8D,10,D®,AD,BE, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


E1,0A,AB,AS,14,39,00,D0, 
C8,8N,99,00,00,50,20,3E, 
B7,8E,25,09,20,FD,AE,20, 
SE,E7,8E,26,00,60,20,55, 
CA,8D,8E,C1,8E,8F,C1,20, 
E9,CA,AD,BE,C1,49,FF,48, 
2D,17,00,E0,00,F0,03,0D, 
8E,0C1,8D,17,00,20,68,Ca, 
68,2D0,10,08,E0,002,F0,03, 
CD,8E,C1,80,1D,D0,60,4C, 
y8,B2,20,FD,AE,20,9E,B7, 
E0,10,80,F3,60,20,9E,57, 
EB,04,B0,EB,60,00,07,®E, 
D4,04,04,19,20,40,80,20, 


F3,CA,8A,F®,DA,BE,A1,C1, 
EA,BED,FB,CA,85,FA,BD,FE, 
CA,85,FB,60,20,EB,CA,BE, 
18,04,60,20,05,CB,20,FD, 
AE,20,F3,CA,BD,01,CB,AC, 
A1,C1,39,A1,C1,68,BA,oA, 
OA,0A,8A,60,20,25,CB,20, 
EB,CA,20,34,CEB,8D,8E,C1, 
20,E8,CA,8A,00,8E,C1,AB, 
25,931,FA,20,E8,CA,20,34, 


CB,80,8E,C1,20,E8,CA,BA, 
80,8E,C1,AB,06,91,FA,60, 
20,05,CB,28,FD,AE,20,8BA, 
AD,280,F7,B7,A0,03,A5,15, 
C9,10,B8,08,91,FA,88,A5, 
14,91,FA,60,4C,48,B2,E®, 
00,F0,FB,Ad,44,BC,8E,C1, 
A0,00,88,D8,FD,CE,BE,C1, 
D8,F8,A8,44,8C,8E,C1,CN, 
D®O,EE,60,20,3E,B7,4C,85, 


CB,20,05,CB,20,FD,AE,20, 
BA,AD,20,F7,B7,20,FD,AE, 
20,3E,B7,N0,01,45,15,91, 
FA,BB,AS,14,91,FA,AC,nl, 
C1,B9,41,C1,48,09,01,A®, 
04,31, FA,20,85,CB,h®,04, 
68,91, FA,60,20,6B,CA,8n, 
FO,04,N9,A0,009,02,n9,Eo, 
60,38,20,F0,FF,38,38,E3, 
08,B0,FC,49,FF,69,01,nn, 
EB,CA,D0,01,60,20,3B,AB, 
DO,F7,FF,00,00,00,00,00, 


FOR A-7825 TO 13584 STEP 
8:5=-8:C=9:FOR B=-O TO 7: 
GDSUB 60049 
S-S+H+L-C:C=5>255: 5=255-5 
AND 255:;POKE A+B,H+L:NEXT 
B:G0OSUB 69040 
FS="PRUEFSUMNE OK”: IF S<> 
H+L THEN FS="[LRUSI 
PRUEFSUMMENFEHLER": F=F+1 
GOSUB 609858:NEXT A:PRINT " 
EDOWNI"F"FEHLER":END 

READ H$:G60SUB 60858:H-L* 
16:H$=NIDS CHS,2) 

L=ASC CHS+"X")-48: IF L<® 
OR L>22 THEN 60080 

IF L<12 THEN RETURN 
L=-L-7:1IF L>9 THEN RETURN 
F$S="LRUSIEINSABEFEHLER":L= 
8:E=F+1 

PRINT "ZEILE" PEEK (64) * 
eSE+PEEXN (E3IF$: RETURN 


Kombinierter Hexdump-Basiclader von User-Basic, Teil2 
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Basic- 


Erweiterung 


Masken mit Pfiff 


Mit dem Maschinenprogramm 
Blockmarker können Zeichen- 
oder Textblöcke auf dem Bild- 
schirm optisch hervorgehoben 
werden. Da die Zeilennummern 
erst bei 60 000 beginnen, kann der 
Basic-Lader problemlos an jedes 
Anwenderprogramm angehängt 
werden. Mit einem GOSUB 60 000 
wird das Maschinenprogramm in 
den Speicher gepoket und steht 
ab sofort zur Verfügung. Der La- 
der verschiebt das Programm an 
die Adresse, die in Zeile 60 100 
der Variablen AD zugewiesen 
wurde. Voreinstellung ist 49 152. 


Automatische 


Anpassung 


Die absoluten Sprünge des Ma- 
schinenprogramms werden vom 
Lader automatisch an andere An- 
fangsadressen angepaßt. Die opti- 
sche Markierung kann in drei ver- 
schiedenen Modi erfolgen: 

— Zeichen andersfarbig vom rest- 
lichen Bildinhalt abheben, 

— Bildschirmblock in der Gewähl- 
ten Farbe invertieren und 

— Blinken eines Bildschirm- 
blocks. 

Zur Markierung des Bildschirm- 
blocks sind folgende Parameter 
notwendig: 

— Spalte, Zeile (S, Z) der linken 
oberen Ecke des Blockes, 

— Länge und Höhe (L, H) des 
Blockes, 

— Farbe (F) des Textes bezie- 
hungsweise des Hintergrundes 
(bei Invertierung), 

— Markierungsmodus (M). 

Die Eingabe der Parameter und 
der Aufruf des Programms erfolgt 
dann folgendermaßen: 
SYSAD,S,Z. LH, F,M 

AD ist die Startadresse des Ma- 
schinenprogramms, sie muß mit 
der in Zeile‘ 60 100 festgelegten 
Zahl übereinstimmen. Der Farb- 
code F darf Werte zwischen 1 und 


Einfärben, invertieren 
und blinken — damit 
bringt man Pep in 
müde Bildschirmmas- 
ken. „Blockmarker“ 
stellt die Routinen zur 
Verfügung. 


15 annehmen. Es handelt sich 
hierbei um die übliche Commodo- 
re-Codierung (schwarz = 0, weiß 
= l und so weiter). Der Markie- 
rungsmodus akzeptiert Zahlen von 
0 bis 255. Bei Eingabe von 0 wird 
der Block farbig markiert, bei 1 
farbig invertiert und bei 2—255 
blinkt der Bildschirmblock. Die 
Zahl gibt dann an, wie oft der Text 
blinken soll. Ist M eine gerade 
Zahl, endet die Blinkphase mit far- 
bigem Zeichen, bei ungeraden 
Zahlen mit farbigem Hintergrund 
(RVS). Die Blinkfrequenz kann 


SZLH 
SYSAD, 11, 7, 12,.7, Farbe, N 


durch Veränderung der Warte- 
schleife ab $CODS5 eingestellt wer- 
den: 

POKE AD +216,Zahl (1—255) 

Eine große Zahl (maximal 255) be- 
deutet langsames Blinken, eine 
kleine Zahl (minimal 1) schnelles 
Blinken. 

Der kleinste Block, den man mar- 
kieren kann, ist ein einzelnes 
Zeichen (L = 1,H = |), der größte 
der ganze Bildschirm (L = 40, H = 
25). Dabei ist zu beachten, daß ein 
Spaltenwert S von größer 39 und/ 
oder ein Zeilenwert Z von größer 
24 zu einem ILLEGAL QUANTITY 
ERROR führt. Sofern S+L größer 
39 oder H+Z größer 24 sind (bei 
gültigem S und Z), wird die Höhe 
oder Länge automatisch auf Bild- 
schirmgröße gestutzt: Es erfolgt 
keine Fehlermeldung. Während 
des Blinkens ist ein Abbruch mit 
der Stop-Taste nicht möglich. Hier 
muß man mit RUN/STOP + RESTO- 
RE zu härteren Mitteln greifen. 
Das Demoprogramm vermittelt ei- 
nen kleinen Eindruck der Mög- 
lichkeiten von Blockmarker. 


(Thilo von Stillfriecl) EUMEEENEEENERENE 


N=0 Zeichen farbig, kein Blinken 
N=1 Hintergrund farbig (RVS) kein Blin- 


ken 
N=2—255 Blinken 


So werden die Parameter von SYS bestimmt 
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GOSUB 609098 

PRINT "DAS PROGRAMM IST GELADEN!” 
PRINT ”STARTADRESSE: ";AD 

END 


REM THILO UV. STILLFRIED 
REM MEISENWEG 13 

REM 5983 BALVE ı 

REM CC) 12/85 


REM BLOCKMARKER 

REM SYS AD,S,Z,L,H,F,M 
REM S-SPALTE Z=ZEILE 
REM L=LAENGE H=HOEHE 
REM F=FARBE M=MDDUS 
REM AD-STARTADRESSE 


AD-12*4036 


FOR I=AD TO AD+223 
READ A 

POKE I,A 

SU-SU+A 

NEXT 


N=CAD+213)/256 

H=INT. (N) 

L=(N-H)*256 

POKE AD+174,L:PDKE AD+206,L 
POKE AD+175,H:PDKE AD+297,H 


N=CAD+B3)/256 
H=INT CN) 


Basic- 
Erweiterung 


60229 
692398 


60243 


69244 
60245 


60591 
60502 


60503 
60584 
60505 
60506 
60507 
60508 
60503 
69510 
60511 
60512 


60513 


Basic-Lader von Blockmarker (mit dem Korrektor eintippen!) 


1088 REM BLOCKMARKER DEMO 

18018 GOSUB 1630 

1020 

1038 PRINT CHRS (147) 

1048 POKE 53280,0 

1058 POKE 53281,0 

1068 PR-828 

1978 AD-12*4096 

1080 : 

1098 REM BLOCK 1: 

1100 SYS PR,S,5, "BLOCKMARKER IST EIN 
MASCHINEN-” 

1118 SYS PR,S,6, "PROGRAMML3SPACESIZUR 
E4SPACESIHERVORHEBUNG” 

1128 SYS PR,S,7,”VON ZEICHEN- UND 
L2SPACESITEXTBLOECKEN” 

1130 ; 

1148 F=-3:M-5:B-109:G60SUB 1488 

‚1158 : 

1168 REM BLOCK 2: 

1178 SYS PR,2,12,"DIE MARKIERUNG KANN” 

1188 SYS PR,2,13, "WIEL2SPACESIFOLGT 

DURCHGE-" 

1190 SYS PR,2,14, "GEFUEHRT WERDEN: 
L3SPACESI” 

1208 : 

1218 F=7:M=8:B-50:60SUB 1538 

1220 : 

1238 REM BLOCK 3: 

1248 SYS PR,17,16,”[CCBM A] 
———— CN 5)” 

125@ SYS PR,17,17,”1SYS AD,S,Z,L,H,F,M{” 

1268 SYS PR,17,18,”[CBM 2] 
SL. eprmTerEmEETEEm er gmEE Eee 5) 88 31 8 059 „© hd 

12708 : 

1288 F-18:M=29:B-10:G60SUB 1589 

1290 : 

1308 POKE AD+2156, 208 

1318 SYS AD,13,1,10,22,13,7 

1320 : 

233925Y57PR; 3012,77” 

1348 POKE AD+2156,30 


Demo von Blockmarker 
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L=-(N-H)*256 
POKE AD+211,L:POKE AD+212,H 


60240 : 


IF SU<>33683 THEN PRINT "ERROR IN 
DATA'’S” 


RETURN 


60500 : 


DATA 160,0,152,72,32,253,174,32,158, 
183,104,158,150,170,200,192,6,208 


DATA 239,24,165,1790,201,490,144,2,176, | 


59,24,165,171,291,25,144,2,176,41 

DATA 24,165,170,101,172,201,41,144,10, 
233,40,133,251,165,172,229,251,133 
DATA 172,24,165,171,101,173,201,86, 
144,18,233,25,133,251,165,173,229,251 
DATA 133,173,24,144,5,162,14, 76,55, 
164,169,216,133,176,169,215,133,177 
DATA 162,255,165,176,24,105,40,144,2, 
230,177,133,176,232,228,171,208,249 
DATA 165,176,24,101,170,144,2,230,177, 
133,176,165,177,233,211,133,252 

DATA 133,254,165,176,133,251,133,253, 
133,178,165,177,133,179,166,173,160 
DATA 0,165,174,145,178,200,196,172, 
208,247,165,178,24,105,40,144,2,230 
DATA 179,133,178,202,208,231,165,175, 
201,0,240,50,32,213,192,166,173,160 
DATA ®,177,253,73,128,145,253, 200,186, 
172,208,245,165,253,24,105,40, 144 
DATA 2,230,254,133,253,202,208,229,3e, 
213,192,198,175,76,83,192,162,255 
DATA 160,50,136,208,253, 202,208, 248,96 


SYS AD,30,12,1,1,1,51 
SYS AD,0,0,40,25,14,5 


F=INT C1S*RND C1)):M=S:B=INT C100* 
RND (1)+10):G0SUB 1578 
F=-INT C15*RND C1)):M=7:B=INT C100* 
RND (1)+18):G60SUB 1488 
F=INT C15*RND C1)):M=9:B=INT C100* 
RND (1)+18):G0SUB 1538 


GOTO 1100 

END 

REM BLOCKMARKIERUNGEN 
REM BLOCK 1 


POKE AD+216,B 
SYS AD,S,5,30,3,F,HM 


RETURN 


REM BLOCK 2 

POKE AD+216,B 

SYS AD,2,12,19,3,F,M 
RETURN 


REM BLOCK 3 

POKE AD+216,B 

SYS AD,17,16,20,3,F,M 
RETURN 


END 
REM =* PRINT AT S,2 m 
REM *= SYS PR,S,2,"TEXT”*= 


FOR 1=828 TOD 853:READ A:POKE 1,R: 
NEXT 

RETURN 

DATA 032,253,174,932,158,183,138, 
072,032,253,174,032,158,183,104,168 
DATA 024,032,240,255,932,253,174, 
076,164,170 


Assemblerlisting von Blockmarker 


ORG 8C008 
L009 Aa ’ P 
coo0 Aa "#04 PARAMETER EINLESEN 
coa9 AB9O LDY #800 
coo2 98 LOOPI TYA 
cooS3 48 PHA 
ca94 ZOFDAE ' JSR $AEFDI" AUF KOMMA PRUEFEN 


sB79E," WERT IN FAC HOLEN 


UND AB #AA SPEICHERN 


san,Ys" 


jei:} 
COOF C096 CPY WR08ı" 6 WERTE ? 
coil DOEF BNE LOOPI 
co1S 18 anna AUF FEHLER PRUEFEN 
co1ls 18 CLC 
co14 ASAA LDA AA 
col& C928 CMHP N8281" + 8 > 39 
co18 9002 BCC ERR2 
co1A BA52 BCS FEHLER 
coic 18 ERR2 cLc 
CO1iD ASAB LDA #AB 
COiF C919 CHPHSITII" 2 > 247 
co21 9002 BCC ERRS 


8+L > 497 


B) De nn ax 
Narr , Ad GH" = ae 
tet FERERUN ON me 


am 


Z+H > 257? 
19 arbt= 
N an 


Hı= H-sFB 


CoaC 99« BCC BLINK 


COAE AZOE FEHLER LDX #$0E3 " FEHLER NR. 14ı 

cy95a 4CI37A4 JMP_3A437," ILLEGAL QUANTITY ERROR 
co53 A? sans ADRESSE LINKS-OBEN BERECHNEN 

CV53 A7DB BLINK LDA ##D89;" L-BYfE FARBRAM -48 
C955 85B9 STA $B9 


H-BYTE FARBRAM -48 


C9SF 18 

CO60 697728 ADC #3287” Z*40 ADDIEREN RER 
c9&s2 7962 BCC NOC1 I -Literatur 
C964 EöBi Inc sBi Theo-Prosel-Weg 1 8000 München 40 
C065 85Bo NOoc1 EN Bo 


ZEILE ERREICHT? 


Ss ADDIEREN 


c974 EöBi INC $B1 

C97& BSB® NOC2 STA_s$EO 

C978 AS je ZWISCHENSPEICHERN DER WERTE 
c078 ASB1 LDA $B1 

c97A E9DS SEC #$D3 


H-BYTE BILD-RAM 


Erst 
Flimmerkiste - 


L-BYTE BILD-RAM 


WALTON MASTERS, MÜNCHEN 


[pa $Bi 
STA_$B3 
1"aeaae BLOCK MIT FARBE SETZEN 
Cosc LDX $AD;" BLOCKHOEHE [] 
COBE KA00A BLOCK1 LDY #300 ann 
C090 ASAE BLOCK2 LDA $AEL" BLOCKFARBE ° 
6092 91B2 STA (aB2I, va" IM FARBRAM SPEICHERN 
Der wunde Punkt! 


BLOCKLAENGE ERREICHT? 2 
Kinder konsumieren zu oft und Eltern sollten besser die 


zu lang kritiklos Fernsehsendun- Fernseh-Zeit begrenzen und 
gen. Wo bleibt da noch Zeit für die Sendungen mit den Kindern 


H=40 ADDIEREN 


CoAa E6B3 } ING #83 


Cons ER, a Be BE BLOCKHOEHE ERREICHT? RT 
o E OR Sl c a 
CAT AS I"sene® BLINK- U. RVS-MODUS und eigene auswählen. 
Con? ASAF LDA #Arı" ANZAHL DER _BLINKFHASEN 

CoAF 6900 EMP 48004" SAF=0 NICHT BLINKEN 


BEQ FINISHI" RETURN 


WARTESCHLEIFE 
BLOCKHOEHE 


BILDRAM LADEN 


COB2 A0de LOOP2 
ö BRAM 


COB& 4980 E 80% INVERTIEREN 

COB8 91FD STA (#FD),YI“ UND WIEDER SPEICHERN 
caRA CB INY 

CORB CA4AC ECPY sACcı" BLOCKLAENGE ERREICHT? 
COBD DOFS BNE BER 


Fragen Sie uns - wir helfen weiter. Helfen 
auch Sie mit - durch Ihre Spende: PSchAmt 
München, Kto-Nr. 440 809. 

Deutsches Kinderhilfswerk e. V. 
Langwieder Hauptstr. 4, 

8000 München 60. 


3281" H#48 ADDIEREN 


JMP BLINK 

ceD5 AZ ı"a#»%#+* WARTESCHLEIFE 
AsFF 
“32 


BNE 
FINISH RTS 


Das Deutsche Kinderhilfswerk e.V. dankt für die kostenlose Einschaltung dieser Anzeige. 
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Basic- 


Erweiterung 


| Unbeschränkte 
Funktionseingabe 


‚Das Commodore Basic kennt den 


Befehl 'DEF FN', Er kann dazu 
verwendet werden, Funktionen 
allgemein zu definieren und dann 
bestimmte Werte zu berechnen. 
10 DEF FNA(X)=2#*X13+2/3x* 
Xt2+X 

20 PRINT FNA(7) 

berechnet FNA(X) für den X-Wert 
'T. Der Term in Zeile 10 kann je- 
doch nicht durch eine Variable er- 
setzt werden. Das bedeutet für die 
Programmiersprache, daß die 
Funktion im Programm definiert 
werden muß und nicht mehr geän- 
dert werden kann, es sei denn 
durch eine neue Definition. Das 
kostet Speicherplatz und Mühe 
beim Programmieren. Die Utility 
'DEF-Modifikation’ wandelt einen 
beliebigen String (er muß selbst- 
verständlich in mathematischer 
Schreibweise übergeben sein) bei 
Aufruf von FNF(..) in eine Funktion 
um und wertet sie aus. Das Prin- 
Zip: 

l) USR-Vektor wird auf eigenes 
Maschinenprogramm gestellt. 

2) Eingabe der gewünschten 
Funktion in eine Stringvariable. 

3) Funktionszeiger von DEF FN 
umleiten durch: DEF FN(X)=USR 
(AA$). Dabei muß die Funktions- 
variable in der Klammer nach FN 
stehen. 


print chr$ (14) chr$ (147):print : 


print 
print ” Wo soll das 

Maschinenprogramm” 

print ” abgelegt werden 
print ” Cassettenpuffer 
print ” max beginn 950”: 
print ” Bereich 49152 - 
BEINE." 
print ” 


max beginn 53178":print 
oberhalb von-Basic, 


Wer Funktionsglei- 
chungen nach Bedarf 
neu definieren will, 
kommt mit dem Com- 
modore Basic nicht 
aus. Er braucht eine 


eigene Utility. 


4) Übernahme eines Arguments: 
INPUT „X";X 
5) Auswerten 
PRINT FNF (X) 


der Funktion: 


Programm benutzt 


Puffer‘ 
a 


(Das Maschinenprogramm benutzt 
den Basic-Eingabepuffer, deshalb 
kann diese Erweiterung nur im 
Programmodus verwendet wer- 
den): 

10 INPUT A$ 

20 INPUT X 

30 PRINT USR (A$) 


Dabei muß X die unbestimmte Va- 
riable in A$ sein; beispielsweise 
SIN(X) oder 2*X, 

Das Programm ist zu praktisch al- 
len Basic-Erweiterungen kompati- 
bel; daher können im String auch 
deren Funktionen verwendet wer- 
den. 


79 Bytes 


im REM versteckt 
Be 


Das Programm ist im Speicher frei 
verschiebbar. Da es darüber hin- 
aus nur 79 Bytes lang ist, läßt es 
sich sogar in eine REM-Zeile pak- 
ken. Die Programmierung ist teil- 
weise umständlich (LDY #FF, INY 
statt LDY#0), aber nur so ließen 
sich Nullbytes vermeiden. 
Anhand eines Beispiels soll die 
Funktion des Programms erklärt 
werden. 

10 INPUT "Funktion f(x)="zA$ 
20 DEF FN Fix) USR (As) 


350 INPUT "ARGUMENT X="3X 
40 PRINT FNF (x) 


Das Demoprogramm läuft bis Zei- 
le 40 wie jedes andere Basic-Pro- 
gramm auch, da USR ein regulä- 
rer Basic-Befehl ist. In Zeile 40 
wird dann nach Aufruf von FNF(X) 


poke 786,int (i/256):poke 785, ((i/ 


eSs6)-int (i/256))*256 


restore 


For i-i to i+69:read a:poke i,a:b=b+ 


?”’;print a:next 
828-1019” 
5 Be 


Vektorn 


if b<>9143 then print chr$ (147): 
:print ” Fehler in datas”:end 
rem eventuell ruecksprung mit gotoau 
s unterprogramm 


werden” 


print ” automatisch geaendert, 


Eingabe -1”:print 

input ” MC - Programmbeginn: 
if i<958 and i>827 then 188 
if i<53178 and i>49151 then 
if i<>-1 then 38 


Erg 


180 


i=peek (55)+256*peek (56): i=i-69 


poke S56,int (i/256):poke 55, 
eS56)-int (i/256))*256-1:clr 
peek (56)+peek (55) 


Assemblerlisting für die Funktionseingabe 
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Cli/ 
:i=256* 


WAAMSENRESSMPUTERWORLD- SEM 


data 32,231,176,160,1,136,177,71,7e, 
230,71,208,2 

data 230,72,177,71,133,75,200,177, 
71,133,76,104,168 

data 136,177,75,200,153,255,1,136, 
136,16, 246,165, 1e2 


data 72,165,123,72,169,255,133,122, 
239,1022,169, 2,133 

data 123,32,121,165,230,122,230,123, 
32,138,173,184,133 

data 123,184,133,122,96 


0210 ; 
980228 ; 
0838 varptn .de $47 
BB4® opptr .de $S4b 
0058 txtptr .de 57a 
0069 buf .de 5290 
0070 ; 

0089 ; 


Basic- 
Erweiterung 


benutzte zeropage-adressen 


;variablenzeiger 
;programmzeiger 
;programmzeiger 
;basic - eingabepuffer 


00890 ’ benutzte basic - routinen 


2100 ; 

81190 crunch .de $a579 
2122 frmnum ‚de Sadda 
8130 ordvar ‚de $bde7? 
8140 ; 

8150 ; 

0168 ; beginn programm 
0170 ; 
0180 
0190 ; 
v220 
2210 ; 
0220 ; 
0230 
B2HD 
0250 
0268 
0270 
92808 
9230 
0398 
0319 weiter 
03208 
0338 
083490 
0350 
0368 
8378 
0388 
03398 
24090 
0418 
2420 
0438 
0440 
2459 
2460 
0478 
0482 
2438 
2598 
0518 
0528 
0538 
0540 
8558 
0562 
0578 
05808 
9538 
0689 
0618 
06298 
0630 ; 
0640 ; 
0658 


$c000 


ordvar 
#501 


varptn 
weiter 


opptr 


loop 
txtptr 


#Sff 
txtptr 
txtptr 
#82 


erunch 
txtptr 


frmnum 


txtptr 


(varptn),y 


varptn+i1 
(varptn),y 


(varptn),y 


opptr+1 


Copptr),y 


buf-1,u 


txtptr+1 


txtptr*+1 


txtptr+1 


;variableninhalt in token 
‚auswerten ausdruck 
‚variable suchen 


;hier z.b. nach c0080 


;objektcode in speicher 


‚variable suchen 


;yrregister-® 

;anzahl der bytes 
;retten 

;auf variablenanfang 
;nicht 8, dann weiter 


‚anfang low 
;zwischenspeicher low 


;anfang high 
;zwischensp. high 
‚anzahl zurueckholen 
;ins y-register 
;anzahl-1 . 
;text laden 


‚weiter bis unterlauf 
;zeiger retten 


„® nach txtptr 


;22882-zeiger txtptr 
‚text in token wandeln 
;wird wieder ® 

‚wird wieder 2 
zauswerten 

;alte zeiger zurueck 


txtptr+1 


Assemblerlisting für die Funktionseingabe 


ein Zeiger auf das Byte hinter dem 
Gleichheitszeichen in Zeile 20 ge- 
setzt, und dann wird die Funktion 
mit dem Argument X ausgewertet. 


USR-Vektor 
KERE 


Der USR-Vektor wird angesprun- 
gen und das Maschinenprogramm 
ausgeführt. Im Zeiger für den Va-' 
riablennamen befindet sich nun 
das A$. Die Variable wird gesucht 
und der Inhalt von A$ in den Ba- 
sic-Eingabepuffer kopiert. Dort 
wird A$, das ja in ASCII-Form vor- 
liegt, in entsprechende Basic-To- 
ken umgewandelt und anschlie- 


ßend mit dem Argument X ausge- 
wertet. Mit dem abschließenden 
RTS wird das Maschinenpro- 
gramm wieder verlassen und die 
übergeordnete FN-Routine (im Ba- 
sic ROM) normal weiter abgear- 
beitet. 


Funktionsübernahme 


Falls die Variable innerhalb der 
Klammern der USR-Funktion vor- 
her nicht durch Input oder ähnli- 
ches definiert wurde, wird die Va- 
riable durch das Maschinenpro- 
gramm als leere Variable ange- 
legt und das Argument so ausge- 
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geben, wie es eingegeben wurde. 
Üblicherweise nutzt man folgende 
Möglichkeiten der Funktionsüber- 
nahme in Basic: 

l) Simulierte Tastatur, also Erzeu- 
gen einer neuen Basic-Zeile und 
2) Einpoken in einen vorher defi- 
nierten Bereich. 

Die Nachteile von 1) sind die voll- 
kommene Übergabe des Pro- 
gramms an den Benutzer und der 
Variablenverlust. ‘Der Nachteil 
von 2) ist, daß der Bereich, in den 
eingepoket wird, genau festgelegt 
werden muß — ein SPACE zuviel 
und schon läuft nichts mehr. Nach- 
trägliche  Programmänderungen 
sind nur schwer möglich. 


Komfort ohne 


Variablenverlust 
SERIE 


All diesen Nachteilen wirkt das 
Programm entgegen: 

Zum einen ist es möglich, die Ta- 
stenkombination RUN/STOP-RE- 
STORE zu sperren. Damit kann: 
man ein versehentliches Stoppen 
beziehungsweise ein unbefugtes 
Listen verhindern. Außerdem ist 
eine komfortable Eingabe unpro- 
blematisch. Eine GET-Schleife mit 
Abfrage ist ohne Einschränkung 
möglich. Darüber hinaus ist die 
Routine sehr schnell, und es tritt 
nicht, wie bei Verwendung des 
Dynamic keyboard (simulierte Ta- 
statur), ein Variablenverlust ein, 
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Medizin 
der 
Armut 


Mehr als fünfzig Prozent 
der indischen Dorf- 
bewohner leben unter- 
halb der Armutsgrenze, 
verdienen weniger als 
zehn Mark im Monat und 
haben kaum eine 
Mahlzeit am Tage. Diese 


Menschen stehen auch 
in der Gesundheitsver- 
sorgung an letzter Stelle. 
Deshalb wurde vor 

zehn Jahren von einem 
indischen Arztehepaar 
ein Entwicklungs- und 
Gesundheitsprogramm 
gestartet, das nunmehr 
60 Dörfer mit rund 
100000 Einwohnern er- 
faßt:Das Modell von _ 
Jamkhed. Hier wurde mit 
geringen finanziellen 
Mitteln ein Gesundheits- 
system aufgebaut, das 


sich heute selbst trägt. 
Es umfaßt: Zusatznah- 
rung für Vorschulkinder 
und Mütter, volle Behand- 
lung von Malaria, Lepra, 
Tuberkulose und Augen- 
krankheiten, Vorbeuge- 
maßnahmen, sauberes 
Wasser etc. Die Investi- 
tionskosten für dieses 
Projekt betrugen pro 
Person DM 2,-. 
Informationen zur 
Aktion Brot für die Welt 
Stafflenbergstraße 76 
7000 Stuttgart 1. 
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board- 


Gebrauchs- 
Anweisung 


1. Anzeigentext in die vorgedruckten 
Zeilen der Karte schreiben — 
maximal 6 Zeilen mit Anschrift 
oder Telefon-Nummer (pro Buch- 
stabe, Satzzeichen, Wortzwi- 
schenraum = 1 Kästchen). 

2. Rubrik, Bereich und Zahlungswei- 
se ankreuzen, Adresse auf der 
Rückseite der Karte angeben. 

3. Datum und Unterschrift nicht ver- 
gessen 

4. Karte zusammen mit $-DM-Schein 
oder V-Scheck über DM 5,— ın 
Umschlag stecken. 

5, Umschlag zukleben, ausreichend 
frankieren und abschicken an: 
CW-Publikationen 
— RUNboard — 

Postfach 40 04 29 
8000 München 40 

6. Die Anzeige erscheint im nächst- , 

möglichen RUNboard. 


Ich habe die Gele 
genheit genutzt! 


gm 


Ichhabe am 
Gelegenheits-Anzeige im RUN- 
board bestellt. Sechs Zeilen zum 
Taschengeld-Tarif von nur DM 5,— 
inkl. ges. Mehrwertsteuer. Die DMS5, 
habe ich der Bestellung beigelegt als 


o V-Scheck © Geldschein 


eine 


Disketten-Service 


äm0 


Ichhabe am beider 


RUN-o-thek Diskette(n) 
mit den Programmen aus RUN- 


bestellt. 


Ausgabe 


© Bezahltmit V-Scheck-Nr._____ 
Konto-Nummer 
BLZ/Geldinstitut 
(6) Ich bezahle per Nachnahme. 


bi 


Basic- 


Erweiterung 


Basic mit 


großen Möglichkeiten 


„Immer schneller, immer komfor- 
tabler, immer billiger" ist die De- 


E yise auf dem: Hitech-Markt. Des- 


halb wird sich, wer das professio- 
nelle Arbeiten auf Microcompu- 
tern oder gar auf Großrechenan- 


lagen gewohnt ist, nur schwer mit . 


dem mageren Basic des Commo- 
dore 64 anfreunden können. Und 
doch steht dieser Computer in ei- 
ner halben Million bundesrepubli- 
kanischen Behausungen. Das liegt 
auch an Programmen wie „Makro- 
Basic", Sie strafen den Ruf der Un- 
benutzbarkeit im professionellen 
Einsatz Lügen. MakroBasic ist als 
Befehlserweiterung zur Program- 
mierung „ernsthafter" Anwendun- 
gen gedacht. Auf spezielle Sound- 
und Hires-Befehle wurde daher 
verzichtet. Das potente Basic grö- 
ßerer Maschinen wird mit Makro- 
Basic auf dem C64 simuliert. Die 
meisten Befehle, wie beispielswei- 
se PRINTUSING, sind bekannt 
und gefragt. Für alle — für die 
Kenner zum Auffrischen, für die 
Einsteiger zum Kennenlernen — 
hier. die Syntax der 34 neuen Be- 
fehle (Parameter in Klammern op- 
tionall): 

PRINT@ z,s(‚Ausdruck): Der 
Ausdruck wird ab Bildschirmposi- 
tion z (0—24)/s (0-39) ausgege- 
ben. Ohne Angabe des Aus- 


"drucks wird lediglich der Cursor 


auf Zeile S und Spalte s gesetzt. 


- PRINTUSING (z,s,) 


Format$, Ausdruck: Der numeri- 
sche Ausdruck wird ab Zeile z, 
Spalte s oder, wenn die Angaben 
fehlen, ab Cursorposition forma- 
tiert ausgegeben. Im Formatstring 
wird das erste '#' als Zahlenan- 
fang betrachtet, das erste Zeichen 
ungleich '.#' als Zahlenende. 
Beispiele: PRINTUSING"DM 
####.##",2000/3 druckt "DM 
666.67‘, da automatisch gerundet 


wird. PRINTUSING10,0, 
"# # #,. # # =Summe" 200 er- 
gibt auf dem Bildschirm 


'"200.00=Summe’. Achtung: PRIN- 
TUSING kann nur positive Zahlen 
ohne Exponenten verarbeiten. 


MakroBasic macht aus 
dem betagten Commo- 


dore Basic V2 eine pro- 


fessionelle Program- 


miersprache. 


INPUT@ z,s,Stringvar,Länge: An 
der Position z,s wird in einem Be- 
reich gegebener Länge Text ein- 
gegeben und anschließend der 
angegebenen Stringvariablen zu- 
gewiesen. Es ist nicht möglich, 
den Bereich während der Einga- 
be zu verlassen. Mit Retum, Fl 
oder F2’beendet man die Einga- 
be. Bei Beendigung mit Return 
enthält die Variable IN den Wert 
'Länge', bei Beendigung mit Fl ist 
IN=255, bei F2 ist IN=0. 

CLS (Füllzeichen);: Der Bild- 
schirm wird mit Leerzeichen oder 
mit dem angegebenen Füllzei- 
chen gefüllt. Das Füllzeichen muß 
entweder als String oder als Poke- 
code angegeben werden. CLS 
verändert die Cursorposition 
nich. Wenn ein 'HOME' ge- 
wünscht wird, muß man es selbst 
auslösen. Beispiele: 

CLS" A“ füllt den Bildschirm mit 'A’ 
CLS 160 füllt den Bildschirm mit 
reversen Leerzeichen. 

DEL@ z(,Füllzeichen): Füllt die 
Bildschirmzeile z (0—24) mit Leer- 
zeichen oder mit dem angegebe- 
nen Füllzeichen. 

DEL _zl,z2,s1,s2(‚Füllzeichen): 
Füllt das Rechteck, das von Zeile 
zl bis z2 und Spalte sl bis s2 
reicht, mit Space oder dem Füll- 
zeichen. Bei diesem Befehl sind 
ale Werte vorbelegt: zi=0, 
z2=24, sl=0, s2=39. DEL 10 
löscht den Bildschirm ab Zeile 10, 
DEL,10 löscht bis Zeile 10. DEL 
12,24,20 löscht das untere rechte 


.Viertel des Bildschirms. Achtung: 


Angaben wie DEL,,35 werden 
nicht angenommen. Es darf höch- 
stens ein vorgestelltes Komma 
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vorkommen. 

VINPUT z1,z2: Dieser und der fol- 
gende Befehl ersparen viel Pro- 
grammierarbeit. Die Programmie- 
rung von Menüeingaben wird zum 
Kinderspiel. Der Bildschirmbe- 
reich von Zeile z] bis z2 wird von 
Spalte 2 bis 38 nach Text durch- 
sucht. Der erste gefundene Text 
wird invertiert. Danach hat der 
Anwender die Möglichkeit, mit 
den Cursortasten auszuwählen. 
Wie beim Befehl INPUT@ kann 
man mit Return, Fl oder F2 been- 
den, wobei der Variablen IN die 
Nummer des zuletzt angewählten 
Textes (Return), 0 (Fl) oder 255 
(F2) zugewiesen wird. 

HINPUT: Die unterste Bildschirm- 
zeile wird nach Texten durch- 
sucht, die durch Leerzeichen ge- 
trennt sein müssen. Der erste ge- 
fundene Text wird invertiert, Da- 
nach wird wie bei VINPUT verfah- 
ren. 

VPLOT z,s,h(,f): Ab der Zeichen- 
position in Zeile z, Spalte s wird 
nach oben ein Balken der Höhe h 
(zwischen 0 und 199) und der Far- 
be f gezeichnet. Für f ist die mo- 
mentane Zeichenfarbe voreinge- 
stellt. 

HPLOT z,s,b(‚f): Wie VPLOT, 
aber horizontal 
rechts. Die Breite b liegt zwischen 
O und 319. 

INK (Farbe): Wahl der Zeichen- 
farbe. INK ohne Parameter wählt 
weiß. 

BORDER rf(‚hf)}: Wählt die Rah- 
menfarbe rf und optional die Hin- 
tergrundfarbe hf. BORDER ohne 
Parameter setzt die Rahmenfarbe 
auf den Einschaltwert. 

GROUND hf: Wählt die Hinter- 
grundfarbe hf. GROUND ohne Pa- 
rameter setzt die Farbe auf den 
Einschaltwert. 

BELL (freg): Läßt einen Gong er- 
tönen. Als Parameter kann das 
Highbyte der Frequenz angege- 
ben werden. 

SEC s: Bewirkt eine Programmier- 
Pause von etwa s Sekunden. 


SWAP vl,v2: Die Werte der bei-» 
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von Z,s nach. 


den Variablen werden vertauscht. 
Es können auch normale mit indi- 
zierten Variablen vertauscht wer- 
den. Beide müssen jedoch vom 
selben Typ sein. 

CGET a$,Tabellen$: Die Tastatur 
wird so lange abgefragt, bis ein 
Zeichen eingegeben wird, das in 
tabellen$ enthalten ist. Dieses 
Zeichen wird in a$ übernommen. 
Beispiel: 

CGET K$,“ 120"+CHR$(13) war- 
tet, bis Space '1', '2', 'Q' oder Re- 
turn gedrückt wurde. 

CENTER z,a$: Die Zeichenkette 
a$ wird in Zeile z zentriert ausge- 
geben. Die Cursorposition wird 
dabei nicht verändert. 

OLD: Macht unmittelbar zuvor er- 
folgtes NEW rückgängig. 

POP (Zeilennummer): Dieser Be- 
fehl entfernt eine Rücksprung- 
adresse vom GOSUB-Stack. Wahl- 
weise kann danach zu einer ande- 
ren Zeile gesprungen werden. 
Die Verwendung dieses Befehls 
ist kein guter Programmierstil und 
sollte auf 'Notfälle' beschränkt 
werden. 

POS Spalte: Der Cursor wird in 
der aktuellen Zeile auf die ge- 
wünschte Spalte gesetzt. 
MID$(x$,p(,a))=y$: a Zeichen aus 
y$ werden in x$ ab der Position p 
einkopiert. Dadurch besteht die 
Möglichkeit, einzelne Stringteile 
ohne großen Aufwand und viele 
Müllstrings zu ändern. Beispiel: 
A$="123456789":MID$(A$,2) 
="RUN" ergibt für A$ den Inhalt 
"]RUN56789" 

INSTR (wo$,was$): Diese Funk- 
tion liefert die Positionsnummer 
von was$ in wo$. Kommt was$ in 
wo$ nicht vor, wird 0 zurückgege- 
ben. Beispiel: 
"A=INSTRC'HILFE","T"):liefert den 
Wert2inÄA. 

CUT (a$,Füllzeichen): Schneidet 
von rechts alle Füllzeichen aus a$ 
heraus, bis ein anderes Zeichen 
gefunden wird. Das Füllzeichen 
wird entweder als String oder als 


ASCII-Code angegeben. 
Beispiele: 

A$=CUT('RUN.....",*.") ergibt 
‘RUN“ in A$. PRINT CUT 
("AAAAAAA",65) druckt einen 
Leerstring. 

FULL (a$,Füllzeichen, Länge): 
Der String wird mit dem Füllzei- 
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Erweiterung 


chen auf die gewünschte Länge 
aufgefüllt. Das Füllzeichen wird 
wie bei CUT angegeben. CUT 
und FULL sind,besonders bei der 
Verwaltung relativer Dateien von 
Nutzen. 

ROUND (a,n): Rundet a auf n 
Nachkommastellen. Ohne Anga- 
be von n wird auf ganze Zahlen 
gerundet. DaROUND die Rechen- 
routinen des Interpreters verwen- 
det, kann es zu Rundungsfehlern 
kommen: PRINT ROUND(2000/ 
3,3) gibt 666.667001. In solchen 
Fällen sollte man auf PRINTUSING 
zurückgreifen. 
GOTO,GOSUB,RESTORE: Diese 
Befehle können jetzt auch mit Va- 
riablen verwendet werden. Bei- 
spiele: 

GOTO 3#+ A, RESTORE 10x*SIN(&X) 
IF..THEN..:ELSE: Die IF-Abfrage 
kann: nun auf Wunsch um den 
ELSE-Teil erweitert werden. Vor 
ELSE muß ein Doppelpunkt ste- 
hen! 

Da in den meisten Anwendungs- 
programmen kein oder nur kleine 
Hiresgrafiken gebraucht werden, 
wurde eine Spritegrafik imple- 
mentiert. Die acht Sprites des C64 
werden zu einem 96*42 Punkte 
großen Hiresfenster zusammen- 
gestellt. Dieses Fenster bietet alle 


CLS:BORDER 11,12: INK® 


Vorteile der Sprites, wie Prioritä- 
tenwahl, Vergrößerung und freie 
Verschiebbarkeit. Achtung: Vor 


einem Diskettenzugriff muß das 


Grafikfenster abgeschaltet wer- 
den! Sonst kann es zu Störungen 
der Übertragung von der Floppy 
zum Rechner kommen. 


Im Gegensatz zu anderen Basic- 
erweiterungen, aber in AÄnleh- 
nung an die oben beschriebenen 
Befehle wird auch bei der Sprite- 
grafik zuerst die (Grafik-)Zeilen- 
nummer, also die Y-Koordinate 
angegeben. Folgende Befehle ste- 
hen zur Verfügung: 

SGON y,x(‚expand-y,‚expand-x): 
Das Grafikfenster wird an die an- 
gegebene Position gebracht und 
eingeschaltet. Gibt man für ex- 
pand-x/-y 1 an, wird das Fenster 
in der entsprechenden Richtung 
doppelt so groß dargestellt. 
SGON verändert weder die Far- 
ben noch die Bitmuster der 
Sprites. Beispiel: 


SGON:50,24,1,1: Das Grafikfenster 
wird in der oberen linken Ecke 
des Bildschirms dargestellt. Es ist 
in x- und y-Richtung vergrößert. 
SGON 208,249: Das Fenster wird 
in der unteren linken Ecke einge- 
schaltet. 


PRINT@2,18, "MAKRO-BASIC DEMO” 


PRINTGS,13, "EINGABE” 
PRINT@11,13, "GRAFIK” 
PRINT@13, 13, "ANDERES" 


UINPUTB,14 


IFIN=-BORIN-2SSTHENEND 


ON IN GOT02020, 3000, 49000 


PRINT@24,2,"EIN BEISPIEL FUER DEN BEFEHL HINPUTS” 


HINPUT 
DELS,23,0,24 


PRINTES,2, "BEISPIEL FUER INRUTE: + 


PRINT@11, 3, 


INPUT@11,3,A$,16,”.” 


PRINT@1S, 2, "DRUECKEN SIE NUNZTZZIDDER A: ”; 


EGETAS, ”12A”:PRINTAS 


G60T01898 


SGELS: S6COLB:SGON190,80,1,1 
FORI=1T0202: Y= INTCRNDCX)*30)+1: X=INTERNDCXI*4OI+1 


SET2,X,Y:NEXT 
BELL: SECS: SGOFF 


SGDN128,18: FORX=11048:SETYQ,X,X*2: NEXTX: BELL108:SEC4 


SGOFF: G0T01008 
ELS”+” 


SEC1:FORI=0T024: DEL@I, I:NEXTI 


BEE27 00,.02,.39.5-:SEC2 


DELS,18,18,3®,”K 


PRINTUSING3,4, "ALSD #### EINHEITEN”,18 


CENTER22, ”DEMDENDE”: 


Demo-Programm 


MELONPUFERWORLD. COM 


SEC3:60T01992 


SGOFF: Schaltet die Spritegrafik 
ab. Der Inhalt wird dabei nicht 
verändert. 

SGOL f: Weist dem Spritegrafik- 
fenster die Farbe f zu. Unter- 
schiedliche Farben können durch 
direkten Zugriff auf die Farbregi- 
ster der Sprites erzeugt werden. 
SGCLS Löscht die Grafik. 

SGINV Invertiert die Grafik. 

SET mode,y,x: Der Punkt x,y wird 
gemäß mode angesprochen: 
mode=0: Punkt setzen 

mode=1: Punkt löschen 


Basic- 


Erweiterung 


, mode=2: Punkt invertieren. 


Zusätzlich zu den neuen Befehlen 
erlaubt Makro-Basic das Arbeiten 
mit Hexadezimal- und Binärzah- 
len. Ein vorgestelltes '$’' kenn- 
zeichnet Hexzahlen ($ABD7), ein 
'%' signalisiert eine Binärzahl 
(%1010011). Makro-Basic ist ganz 
in Maschinensprache geschrie- 
ben. Es ist als kombinierter Hex- 
dump-Basiclader abgedruckt. 


Wie man mit dieser Art von Listing 
umgeht, steht auf Seite 6. Wird das 
Programm als Basiclader einge- 


Tabelle 1: Adressen der wichtigsten Routinen 


20,53,E4,20,BF,E3,A6,2C, 
E8,E8,86,2C,C6,2B,10,02, 
C6,2C,A9,00,A8,91,2B,C8, 
C0,23,90,F9,E6,2B,D®,02, 
E6,2C,A5,2B,A4,2C,20,08, 
A4,A9,A9,AB,C0,20,2D,E4, 
AO,00,A9,R®,84,FB,85,FC, 
A2,20,B1,FB,91,FB,C8,D®, 
F9,E6,FC,CA,D®O,F4,A9,36, 
85,01,A9,E3,A2,C1,8D,A1, 
AB,BE,A2,AB,AS,EB,R2,C1, 
BD,24,AQ,BE,25,AQ,A9,FE, 
A2,C1,AQ,4C,8D,05,A6,8E, 
06,AR6,8C,04,A6,A9,43,R2, 
C2,80,16,A0,8E,17,n0,A9, 
2F,A2,C2,80,3E,AQ,BE,3F, 
AQ,AS,3F,A2,C6,8D,22,AD, 
8E,23,R0,20,91,C0,4C,SD, 
E3,A2,0B,BD,3D,C®,90,00, 
03,CA,10,F7,60,8B,E3,E4, 
CO, 7C,A5,EB,C®,21,C1,63, 
C1,93,0D,20,20,2n,2a,2a, 
2A,20,4D,41,4B,52,4F,2D, 
42,41,53,49,43,20,28,56, 
45,52,53,49,4F,4E,20,32, 
2E,33,29,20,2n,2n,2a,en, 
00,020,20,36,34,4B,20,52, 
41,4D,20,53,59,53,54,45, 
4D,20,20,00,A9,36,85,01, 
4C,83,A4,30,03,4C,F3,A6, 
C9,FF,FO,F9,24,0F,30,FS, 
C9,CC,B0,03,4C,24,A7,38, 
E9,CB,AA,84,49,AB,FF,Ca, 
F0,08,C8,B3,DF,CE,10,FR, 
30,F5,C8,B9,DF,CE,10,03, 


WAW. HOMESDMPUTERWORLB- FON 


Befehlserkennung $C121 | SEC SCE1lC 
Funktionsauswertung $C163 | ELSE SC640 
POP $C251 | HPLOT $C699 
PRINT@ $C270 | VPLOT $C6EO 
OLD $C29C | HINPUT $C736 
BORDER $C2DA | VINPUT $C75F 
GROUND $C2F7 | SWAP $C90E 
INK $C305 | PRINTUSING $CY3F 
INPUT@ $C317 | MID$ (neu) $CA81 
CLS $C4C6 | INSTR $CB10 
DEL@ $C5A8 | FULL $CB91 
DEL $C6lC | CUT $CBEI 
DEL $C5C6 


geben, so kann das fertige Ma- 
schinenprogramm nach dem Ein- 
poken der Daten mit 

POKE 43,0 : POKE 44,192 

POKE 45, : POKE 46, 

SAVE “NAME",8 

auf Diskette abgespeichert wer- 
den. Wird es äls Hexdump einge- 
geben, so muß der Checker be- 
nutzt werden. Als Startadresse ist 
C000 anzugeben. Makro-Basic 
wird nach dem Laden mit SYS 
49152 gestartet. 


(Michael Koch) ÜEEEEEEEEEEEREEEEEN 


ROUND 

CENTER 

CGET SCCIc 
BELL SCCEC 
POS $CDID 
SGON $CD27 
SGOFF SCDED 
SET $CESF 
SGCLS $CESF 
SGINV SCEIC 
SGCOL $CEB3 
Befehlstexte $CEDF 
Befehlsadressen SCF5B 


4C,EF,A6,20,47,AB,4C,12, 
C1,20,73,00,C3,CA,D®,03, 
4C,81,CA,C9,B9,D0,03,4C, 
1C,CD,20,79,00,20,3B,C1, 
4C,AE,A7,D0,01,60,E9,80, 
30,28,C9,4C,B0,0D,C9,23, 
B®,06,4C,F7,A7,4C,AS,n9, 
4C,0E,A8,38,E9,4C,0A,AB, 
B9,5C,CF,48,B9,5B,CF,48, 
4C,73,00,49,00,85,00,20, 
73,800,C9,24,F@,18,C9,25, 
FO,4F,C9,FF,F0,04,C9,CC, 
BO,06,20,79,00,4C,8D,AE, 
38,E9,CC,4C,56,C1,20,B7, 
C1,20,73,00,90,0B,C93,41, 
30,22,C9,47,B®,1E,38,E9, 
07,38,E9,30,48,A5,61,F0, 
07,18,69,04,B0,0B,85,61, 
68,F®,DE,20,7E,BD,4C,89, 
C1,4C,7E,B9,4C,79,00,9, 
00,R2,10,95,5D,CA,10,FB, 
60,20,B7,C1,20,73,00,C9, 
32,80,E9,C9,30,90,ES,E9, 
30,48,A5,61,F®,04,E6,61, 
F0,07,68,F®,E7,20,7E,BD, 
4C,C4,C1,29,8A,AD,4C,F7, 
B7,D0,83,4C,1D,AB,20,E3, 
C1,20,13,A6,38,A5,5F,E9, 
01,A4,60,4C,24,AB,AD,00, 
84,0B,88,CA,CB,E8,BD,08, 
02,38,F9,DF,CE,F@,FS,c9, 
80,00,08,18,A5,0B,69,CcC, 
4C,C7,AS,A6,7A,E6,0B,C8, 
B3,DE,CE,18,FA,BS,DF,CE, 
D2,DC,BD,88,02,4C,907,A6, 
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>» 


[238 
c238 
C248 
t248 
[258 
C258 
C260 
C268 
C278 
c278 
C288 
[288 
c230 
c238 
L2AD 
L2AB 
C2BO 
E2BB 
C2CD 
c2c8B 
£C2D08 
C2D8 
C2E® 
C2EB 
C2F® 
E2FB 
C302 
C308 
C31® 
c318 
C3228 
c328 
C33® 
C338 
£340 
c348 
C35® 
C358B 
C36® 
[368 
C370 
C378 
C38B2 
C388 
C399 
C338 
C3AB 
LCI3AB 
C3B® 
' C3B8 
C3CD 
C3C8 
C3D2 
C3D8 
E3E® 
E3EB 
E3F® 
C3F8 
[408 
C428B 
C41® 
C41B 
C429 
C428 
C43® 
C438 
C449 
c448 
C4SB 
C458 
CH68 
C4H68B 
L478 
C47B 
[489 
C488 


15 
BAR 


718 
720 
738 
748 
750 
768 
778 
788 
798 
[214]%) 
810 
828 
838 
840 
859 
860 
878 
880 
B38 
9090 
918 
928 
938 
948 
358 
968 
970 
988 
3398 
1908 
1218 
19028 
1038 
19040 
1058 
1969 
1078 
1888 
1930 
1108 
1118 
1128 
1138 
1140 
1158 
1168 
1170 
1188 
1198 
1208 
1210 
1228 
1238 
1248 
1258 
1268 
1270 
1288 
1298 
1398 
1310 
1328 
1338 
1348 
1358 
1368 
1370 
1388 
1398 
1408 
1418 
1428 
1438 
1448 
1458 
1468 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Basic- 


Erweiterung 


C3,40,F0,00,C9,CD,D9,03, 
4C,3F,C9,20,79,00,4C,AB, 
AA,4C,70,C2,C9,40,F®,06, 
20,79,00,4C,BF,AB,4C,17, 
C3,A9,FF,85,4A,20,8n,#3, 
C3,8D,F0,05,A2,12,4C,37, 
A4,3A,68,68,68,68,68,20, 
73,00,00,01,60,4C,AQ.AB, 
20,83,C2,F0,00,C9,22,Fo, 
03,20,FD,AE,28,79,00,4C, 
AD,AA,60,20,73,00,20,65, 
C5S,86,FB,28,FD,AE,20,62, 
CS,BA,AB,AB,FB,18,20,F0, 
FF,4C,79,00,A5,2B,A4,2C, 
B5,22,84,23,A0,03,CB,B1, 
22,00,FB,C8,38,18,65,22, 
AB,00,31,2B,A5,23,69,00, 
C8,31,2B,88,A2,03,E6,e2, 
D®,02,E6,23,B1,22,D0,F4, 
CA,DO,F3,AS,22,69,02,85, 
2D,A5,23,69,00,85,2E,4C, 
63,A6,F0,15,20,68,C5,8£, 
20,00,20,79,00,F0,09,20, 
FD,AE,20,68,C5,BE,21.00. 
60,A2,0E,BE,20,D0,60,F®, 
07,20,68,C5,8E,21,D0,60, 
A2,06,4C,FC,C2,F®,0n,C9, 
3A,F®,86,20,68,C5,4C,13, 
C3,A2,01,BE,86,02,50,20, 
83,C2,20,24,EA,20,FD,AE, 
20,8B,BO,AS,45,A6,46,8D, 
3E,03,BE,3F,03,20,8F,AD, 
20,F1,B7,86,FB,20,79,00, 
FO,0E,20,FD,AE,20,E®,C4, 
24,0D,10,03,20,FD,CB,2C, 
A2,20,8N,80,99,C4,20,FF, 
C4,AQ,7F,A6,C7,F®,07,Ro, 
03,A0,80,09,80,2C,A2,28, 
BD,SE,C4,8E,26,C4, 80,27, 
C4,A4,D3,A2,00,AD,86,02, 
91,F3,C8,D®,02,E6,F4,E8, 
E4,FB,30,F4,20,C3,C3,38, 
48,A9,01,85,CC,20,22,C4, 
20,A5,C4H,A5,57,18,65,59, 
30,02,E5,58,85,57,A0,00, 
B1,57,29,7F,20,FD,C8B,31, 
62,C8,C4,FB,30,F2,A5S,62, 
AB,63,85,FD,86, FE,84,03, 
AD,39,C4,85,FB,20,F3,CB, 
AD,00,31,47,A4,03,84,FB, 
4C,42,C7,A5,D1,A6,D2,85, 
57,86,58,4%5,03,85,59,AB, 
00,84,CC,8B4,FC,20,00,C8, 
FO,FB,C9,0D,F®,44,C9,94, 
F0,33,C9,14,F0,50,C9,1D, 
FO,44,C9,3D,F@,2A,C9,28, 
930,E3,C9,80,30,04,C9,A0, 
390,DB,A4,FC,C8,84,FC,C4, 
FB,90,0C,F0,03,4C,D5,C3, 
20,47,AB,C6,FC,A9,3D,20, 
47,AB,4C,D5,C3,4C,65,C4, 
AS, FC,FO,F6B,20.22,C4.4C. 
0B,C4,A4,D3,B1,D1,29,7F, 
81,D1,A4,FB,88,60,20,22, 
C4,A9,1D,4C,FA,C3,AS,FC, 
F®0,D8,45,59,18,65,FB,85, 
SA,AS,D2,85,5C,AS,D1,18, 
63,FF,BO,02,C6,5C,85,5B, 
A4,D3,B1,D1,31,5B,C8,C4, 
5A,30,F7,A4,5A,n9,20,31, 
5B,A9,3D,4C,0B,C4,AB,FC, 
E8,E4,FB,BO,AS,28,22,C4, 
AS,59,18,65,FB,38,E9,02, 
85,5A,45,02,85,5C,A5,D1, 
18,69,01,90,02,E6,5C,85, 
SB,A4,5A,B1,D1,91,5B,88, 
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C490 
E49B 
E4AD® 
CHAB 
E4B® 
C4HBB 
E4CO 
C4CB 
C4D® 
C4DB 
C4E® 
C4EB 
C4F® 
C4F8B 
C502 
C508 
C518 
c518 
[5228 
C528 
C538 
C538 
[549 
ES54B 
[558 
C558 
CS68 
CS568 
£C570 
C578 
C588 
C588 
[Bi=}=1%) 
C538 
LSADO 
ESAB 
[812] =1%) 
C5B8 
ESCO 
CSCB 
C5D2 
CS5D8 
ESEd 
CSEB 
ESFO 
CSFB 
[602 
C628 
C618 
C618 
C6228 
C62B 
C630 
[638 
C642 
C64B 
E65 
C658 
E66 
C668B 
[678 
£C678 
C688 
C68B8 
C698 
C638 
C6AD 
E6AB 
C6B2 
C6BB 
E6CD 
E6CB 
C6D® 
C6D8 
EGEO 
CSEB 


1470 
1488 
1498 
1508 
1518 
1520 
1538 
1548 
1550 
1568 
1570 
1588 
1598 
1690 
1618 
1620 
1638 
1640 
1658 
1668 
1678 
1688 


1690 


1788 
1710 
1728 
1730 
1749 
1750 
1760 
1778 
1788 
1798 
1890 
1810 
1820 
1830 
1848 
1858 
1868 
1878 
1880 
1898 
199808 
1918 
1920 
1938 
1940 


1950‘ 


1968 
1970 
19380 
1998 
20088 
2018 
2028 
2030 
2840 
2850 
2OGO 
2070 
2880 
20398 
2100 
2118 
2120 
2130 


2140 


2158 
2168 
2170 
2188 
2198 
2208 
2218 
2229 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


C4,D3,D0, 


90,F4,60,n9,20,4C, 


E5,E8,86,FE,20,73, 


F7,B1,D1,91,5B, 
A9,20,20,47,AB,A9,9D,20, 
47,AB,4C,D5,C3,AD,3E,03, 
AE,3F,03,85,45,86,46,20, 
E7,BO,AS,FB,20,75,B4,A®, 
80,931,47,C8,45,62,91,47, 
C8,AS,63,31,47,60,F0,13, 
280,E0,C4H,BA,A2,00,B6,22, 
PO,1R,C5,R6,02,E8B,E0,19, 
CE,CH, 
20,79,00,20,9E,AD,A5,0D, 
FO,12,20,A6,B6,A8,00,03, 
AS,20,60,R0,00,B1,62,20, 
FF,C4,AA,60,4C,A1,B7,C9, 
C0,90,04,29,7F,B0,12,C9, 
490,98,0E,C9,60,B0,02,43, 
60,C9,A0,B0,02,49,E0,49, 
C0,60,48,1n9,00,85,FD,n9, 
28,85, FE,BS,D9,09,80,35, 
D93,4C,36,C5,48,A5,FD,CS, 
FE,90,03,F0,01,60,20,45, 
ECS,A4,FD,568,20,58,C5,C8, 
C4,FE,30,F8,69,B5,D9,29, 
7F,85,48,18,69,04,85,An, 
BD,F®,EC,85,47,85,A9,60, 
91,A7,48,AD,86,02,91,99, 
68,60,A2,28,2C,A2,19,2C, 
A2,10,86,8F,20,79,00,20, 
9E,B7,E4,BF,B®,03,4C,79, 
89,4C,48,B2,A9,00,Ar,18, 
85,8E,85,8F,20,793,00,F®, 
16,C9,2C,F0,0A,20,65,C5, 
86,BE,20,79,00,F0,08,20, 
FD,AE,290,65,C5,86,8F,A5, 
BE,AB,BF,680,C9,40,D®,1E, 
20,73,208,20,65,C5,86,FB, 
20,79,00,F0,0C,20,FD,AE, 
20,E®,C4,BA,AG,FB,4C,1A, 
C5,A9,20,4C,BC,C5,A9,28, 
85,8BD,A9,008,85,FD,A9,28, 
85,FE,20,7C,C5,85,FB,86, 
FC,20,79,08,F0,23,20,FD, 
AE,20,62,C0C5,86,FD,20,79, 
00,F0,16,20,FD,RE,20,62, 
00,FDd, 
08,20,FD,AE,28,E8,C4,86, 
BD,AB,FB,E4,FC,930,05,F®, 
03,4C,48,B2,A5S,8D,20,2C, 
CS,E6,FB,A6,FB,E4,FC,30, 
F3,F0,F1,60,20,39E,B7,84, 
FO,1D,A2,10,85,FB,B6,FC, 
29,2C,AB,A2,2D,A0,00,88, 
D®O,FD,CA,D®,FA,C6,FC,D®, 
EF,C6,FB,AS,FB,D®,E3,62, 
20,9E,AD,A5S,61,00,12,20, 
73,88,C9,00,F0,0A,C3,CC, 
DaO,FS,20,73,00,4C,43,A9, 
69,4C,2B,A9,AD,86,02,8D, 
49,03,20,65,C5,86,FB,20, 
45,C5,20,FD,AE,29,62,C5, 
B6,FC,20,FD,AE,29,BA,AD, 
20,F7,B7,45,14,A6,15,85, 
FD,B6,FE,20,79,00,F0,09, 
28,FD,AE,20,68,C5,8E,B6, 
02,60,AD,40,03,8D0,86,02, 
60,28,5C,C6,AS,FE,C9,02, 
BO,3B,8A,0A,0n,0n,0n,85S, 
23,A5,FD,48,4A,4A,4A,18, 
65,23,65,FC,48,AB,C5,FC, 
F0,10,C9,27,90,02,A8,27, 
A9,AB,20,58,C5,88,C4,FC, 
10,F6,68,18,68,C0,28,B®, 
09,29,07,AnN,BD,26,C7,20, 
S8,C5,4C,92,C6,4C,48,B2, 
P0,5C,C6,AS,FE,DO,F6,#S, 
FD,4A,4A,4A,85,23,AS,FD, 


Basic- 


Erweiterung 


DAIA 29,07,85,25,R4,FC,A6,23, AD c348 2989 DATA 16,20,A1,B7,E0,19,30,03, 33 
C6F8 2240 DATA FO,21,A9,AB,20,58,C05,A5, BF [359 2998 DATA 4C,48,B2,20,89,C02,20,FD, 80 
C780 2250 DATA A7,38,E3,28,85,47,85,A89, Es C358 3008 DATA AE,20,9E,AD,?8,8F,AD,22, SD 
C708 2268 DATA BB,00,C6,R8,A5,AB,18,69, 6D C369 3818 DATA A6,B6,86,FD,84,FE,85,88, FA 
£718 2278 DAIA D4,85,AA,C9,D8,38,0C,C6, BE CS68. 3028 DATA AB,00,B1,FD,C9,23,F0,08, Ei 
C718 2288 DATA 23,00,DF,A6,25,BD,2E,C7, SC C93720 3830 DATA C8,C4,88,30,FS,4C,08,AF, 01 
C720 2290 DATA 20,58,C5,4C,92,C06,20,65, C8 C378 3948 DAIA 8C,490,03,C8,C4,8B,B0,0E, 62 
C728 2308 DATA 74,75,61,F6,EA,E7,20,64, 2A C380 3858 DATA B1,FD,C9,2E,F0,16,C9,2C,: CS 
C73®0 2318 DAIA 6F,79,62,F8,F7,E3,20,76, IF [388 3868 DATA F9,12,C9,23,F0,ED,8C,41, D® 
C738 2328 DATA C7,38,48,AS,FE,F0,03,29, c4 [339 3978 DATA 03,8C,42,03,R9,00,8D,45, A7 
C740 2338 DATA E3,C7,68,A8,C8,20,A2,B3, 72 C398 3888 DATA 03,4C,B9,C9,80,43,03,8C, 69 
C748 2340 DATA A2,00,86,0C,86,0D,86,0E, 0B CSAD 3038 DATA 41,03,C8,C4,8B,B0,06,B1, 72 
C758 2358 DATA A9,49,A2,4E,85,45,86,46, 33 CSAB 3198 DATA FD,C9,23,F@,F5,8C0,42,03, OF 
C758 2360 DATA 20,E7,BO,AA,4C,D4,BB,20, 53 CSB2 3118 DATA 88,98,38,ED,41,03,8D,45, Ci 
C7680 2370 DATA 7C,C5,85,FD,EB,86,FE,28, 7F CSB8 3128 DATA: 03,20,FD,AE,20,9E,AD,AE, B3 
C768 2388 DATA 21,C8,98,48,#5,58,F0,D2, 14 CSC®O 3138 DATA 45,03,F0,0A,86,FB,86,FC, 36 
C770 2398 DATA 20,BE,CB,4C,42,C7,R0,00, FA CSC8 3148 DATA 29,F9,C9,4C,D1,C9,20,51, 85 
C778 2408 DATA A2,FF,EB,EO,28,F®,1C,BD, 43 C9300 3158 DATA CC,20,0D,BD,20,07,CA,85, 29 
C7880 2410 DATA C0,07,C9,20,F@,F4,8R,39, 4E CS08 3168 DATA FB,84,FC,AD,00,B1,FB,F@, ©C 
[788 2420 DATA 48,03,C8,E8,BD,C0,07,C9, 5B CSEDO 3178 DATA 07,20,47,AB,CB,4C,DD,C9, 13 
C738 2438 DATA 20,00,F8,84,39,40,03,C8, 52 CSEB 3188 DATA 20,79,08,C9,2C,F0,CA,60, B6 
C7938 2448 DATA 4C,7A,C7,98,4A,85,FE,A9, 1B CSFO 31828 DATA AS,66,48,4C,39,CC,85,8D, AB 
C7AB 2450 DATA 00,85,FB,20,E3,C7,20,00, 85 CSFB 3208 DATA A2,FF,E8,BD,01,01,F0,05, B9 
C7AB 2460 DATA C8,C9,1D,F8,13,C9,31,F0d, 18 CABDO 3219 DATA C5,80,00,F6,60,18,60,49, 11 
C7BO 247® DATA OF,C9,11,F8,1F,C9,3D,F®, 6C CABB 3220 DATA 09,AB,AF,39,50,03,88,D00, 7B 
C7BB 2480 DATA 1B,C9,00,00,ES3,A4,FB,60, 70 CA1DO 3238 DATA FA,B1,FD,99,50,03,C8,C4, FD 
C7C® 2490 DATA 20,E3,C7,A4,FB,CB,C4,FE, 59 CA1S 32490 DATA 8B,90,F6,A9,45,20,F6,C9, 399 
C7CB 2508 DATA D9,02,A0,00,84,FB,20,E3, 33 CA28 3259 DATA 99,03,4C,48,B2,86,8D,A9, AO 
C7D0 2518 DATA C7,4C,05,C8,20,E3,C7,A4, 19 CA28 32608 DATA 2E,20,F6,C9,86,8C,AD,45, SD 
C7D8 2520 DATA FB,C0,00,08,02,A4,FE,88, 40 CA30 3279 DATA 03,F0,18,AC,41,03,CB,E8, 9E 
C7EO 2538 DATA 4C,CC,C7,A4,FE,D®,03,68, 6D CA38 32808 DATA E4,80,B0,04,BD,01,01,2C, 33 
C7EB 2540 DATA 68,60,A5,FB,0R,AB,B9,40, BE CA4Y® 3299 DATA A9,30,99,50,03,C8,CC,42, 87 
C7F®O 2550 DATA 03,AA,B9,41,03,85,FC,BD, BE CA48 3308 DATA 03,90,EC,AD,41,03,38,ES, 43 
C7F8 2568 DATA C0,07,49,80,9D0,C0,07,E8, 7E CAS®BO 3319 DATA 8C,90,05,CD,49,03,B0,03, 1E 
C800 2570 DATA E4,FC,30,F3,60,R3,00,20, 1D CAS8 3328 DATA 4C,48,B2,85,8C,AE,40,03, 4C 
CB08 2588 DATA EE,CB,4C,A6,C7,20,E4,FF,*57 CABdO 3338 DATA A9,20,E4,8C,F0,07,30,50, 15 
C810 2590 DATA C9,89,F0,08,C9,85,F0,01, 59 CAS8 3340 DATA 03,E8,4C,62,CA,R®,00,B3, 77 
C818 2608 DATA 69,AD,FE,2C,Ad,FF,68,68, 33 CA70O 3358 DATA 01,01,30,50,03,E8,C8,EC, 44 
CB20 2610 DATA 60,A2,00,A4,FD,8C,80,03, 08 CA78 3368 DATA 41,03,90,F3,A9,50,n0,03, Di 
c828 2620 DATA 20,AF,C8,C8,C0,24,F0,21, DC CAB®ß 3378 DATA 69,20,73,00,20,FA,AE,20, 67 
C830 2638 DATA B1,FB,C9,20,F0,F5,AD,80, 86 CABB 3388 DATA 8B,B0,85,64,84,65,85,49, 57 
C838 2640 DATA 03,90,40,03,E8,98,3D,40, 5® CASßO 3398 DATA 84,4A,20,R3,B6,n0,00,B1, 1D 
C840 2650 DATA 03,EB,A0,25,88,B1,FB,C9, SF CASB 34090. DATA 64,4B,F0,28,20,52,AA,Aod, BB 
CE48 2660 DATA 20,F0,F3,C8,38,90,40,03, Sa CARD 3410 DATA 01,B1,49,85,FB,C8,B1,49, B® 
CBS0 2678 DATA EB,AC,80,03,C8,C4H,FE,39, 2A CAAB 3420 DATA 85,FC,20,F1,B7,8A,F0,14, C2 
C858 2688 DATA CC,8A,FO,0n,n2,00,38,E9, 17 CABO 3439 DATA CA,86,FD,20,79,00,C9,29, 38 
C8B60 25699 DATA 03,E8,C9,00,00,F8,86,58, EA CABB 3448 DATA D0,04,AS,FF,D0,09,20,F1, 6B 
CB68 2700 DATA A9,90,85,57,20,BE,C8,20, EO CAC®O 3458 DATA B7,8A,D0,03,4C,48,B2,85, 2A 
C870 27109 DATA 0D,C8,C9,31,F0,2A,C9,3D, 6E CACB 3460 DATA FE,68,38,ES,FD,CS,FE,BO, 6E 
C878 27208 DATA FO,26,C9,11,F0,0B,C9,1D, 10 CADD 34708 DATA 02,85,FE,20,F7,AE,A9,B2, 9A 
C882 2738 DATA F0,27,C9,0D,08,E3,A4,57, D7 CADB 3482 DATA 20,FF,AE,20,9E,AD,20,93, 1E 
C888 2748 DATA 69,20,BE,C8B,A4,57,C8,C4, 86 CAEBO 3438 DATA B6,R0,02,B1,64,85,51,88, 1® 
C830 2758 DATA S8,00,02,A0,00,84,57,20, 9F CAEB 3508 DATA B1,64,85,50,88,B1,64,F®, CD 
C8S8 2768 DATA BE,C8,20,EE,C8,4C,6F,C8, 4B ı| CAF® 3510 DATA D3,C5,FE,BB,02,85,FE,AS, 32 
CBRB 2770 DATA 20,BE,C8,R4,57,C0,00,D00, 4E CAFB 3528 DATA FB,18,65,FD,85,FB,38,02, 63 
CBERB 2788 DATA 92,A4,58,88,40,95,C8,B39, FS CBO® 3538 DATA E6,FC,A4,FE,88,B1,50,391, 27 
C8B®O 2798 DATA FO,EC,85,FB,B9,09,90,23, 46 CB2Bß 35498 DATA FB,C0,00,08,F7,4C,AE,A7, 1D 
CBBB 2890 DATA 7F,85,FC,A0,01,60,A4,58, 43 CB1® 3558 DATA 20,FA,AE,20,9E,AD,20,8F, 37 
CBC® 2818 DATA D0,03,68,68,690,A5,57,0A, D5 CB18 3568 DATA AD,AS,64,48,45,65,48,20, 8C 
E8CB 2820 DATA 18,65,57,AA,BD,40,03,85, SC CB282 35708 DATA FD,AE,28,9E,AD,20,R3,B6, 4A 
C8D8 28398 DATA 53,BD,41,03,85,5A,BD,42, 88 CB28 3588 DATA F0,64,85,04,86,FB,84,FC, 1F 
C8D8 2840 DATA 03,85,5B,A4,59,20,AF,C8B, 55 [B32 3539 DATA 68,AB,68,20,AA,B6,F0,56, S6 
CBEO 2858 DATA A4,5A,B1,FB,43,89,31,FB, SF CB38 35602 DATA BS,03,86,FD,84,FE,A2,080, 33 
CBES 2868 DATA C8,C4,5B,D8,F5,690,R2,00, C6 [B48 3518 DAIA 20,79,20,C9,2C,09,07,20, 23 
C8F@ 2878 DATA AB,02,C8,C0,00,00,FB,E8, EB CB48 3628 DATA SB,B7,8A,F0,41,CA,86,06, 76 
CBF8 28808 DATA EO,80,D00,F6,60,85,67,23, 53 CBS® 3638 DATA 20,F7,AE,AS,03,38,E5,04, DF 
[308 2838 DATA 3F,06,67,24,67,10,02,08, CC .| CBS8 35648 DATA 90,28,69,00,85,05,A5,06, EF 
C908 29088 DATA 89,70,02,09,40,68,20,8B, 7E EB5Sß 3658 DATA 18,65,FD,85,FD,580,02,E6, B4 
ES1® 2918 DATA BB,85,FB,84,FC,?29,FD,AE, CB CBEB 3668 DATA FE,AB,00,B1,FB,D1,FD,D®e, 04 
E318 29298 DATA 20,8B,B0,A5,00,F8,96,4C, 73 CB78 3578 DATA 0B,C8,C4H,04,90,F5,A4,06, 3C 
C320 2330 DATA 2C,C9,4C,2F,C9,24,0E,10, 23 CB78 3688 DATA CB,4C,A2,B3,E6,06,06,05, OA 
c928 2948 DATA 06,A0,01,2C,AB,02,2C,Ao, 65 [EBBO 3558 DAIA D0,04,40,00,F0,F3,E6,FD, 50 
C93380 29598 DAIA 04,B1,FB,AA,B1,47,91,FB, A4 CB8SS 3708 DATA DO,DF,E6,FE,D@,DB,4C,48, DE 
C338 2968 DATA 8A,31,47,88,10,F3,60,20, 16 ECBS® 3718 DATA B2,020,01,CB,20,FD,AE,20, 39 
cC940 2978 DATA 73,90,20,3E,AD,24,00,38, SB CBS8 3728 DATA SE,B7,86,FC,E4,03,98,1E, C4 
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CBAB 
CBBo 
CBBB 
CBCO 
EBCB 
CBD® 
CBDB 
ECBE® 
CBEB 
EBFO® 
CBF8 
CC82 
CC2B 
EC10 
cCc18 
£Ec208 
cc28 
CC38 
CC38 
CC4O 
cc48 
ECSO 
CCS58 
CC6O 
CC68B 
£EC70 
CC78 
ECB2O 
CCB8 
CC90 
cC98 
CCAD 
CCAB 
CCBO 
CCBB 
ECCO 
CCCB 
CCDO 
CCD8 
CCE® 
CCEB 
CCF®O 
CCF8 
CDO® 
CDO8B 
£ED1® 
CD18 
CD20 
£D28 
CD38 
CD38 
CD4® 
CD48 
EDS® 
CDS8 
CDE® 
CD68 
CD78 
CD78 
ECDB® 
CD88 
CD92 
CDS8B 
CDAD 
CDAB 
CDBO 
EDB8B 
CDCO 
CDCB 
CDD®O 
CDD8 
CDE® 
CDEB 
EDF® 


3748 
3750 
3768 
3778 
3788 
3738 
3890 
381® 
3820 
3830 
3840 
3858 
3869 
3878 
3880 
38398 
3928 
3310 
3928 
39338 
3942 
3350 
3360 
3978 
3380 
3392 
4200 
4218 
490208 
4038 
4040 
4050 
4060 
49070 
4082 
4899 
4108 
4110 
4129 
4138 
4148 
4158 
4168 
4170 
4180 
4198 
4200 
4218 
42228 
4238 
4240 
42508 
4260 
4278 
4288 
42398 
43988 
4318 
4320 
4338 
4348 
4350 
4368 
4370 
4382 
4390 
4408 
4418 
4428 
4430 
4440 
4458 
4468 
44708 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


‚DATA 


DATA 
DATA 
DATA 
DATA 
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8R,20,7D,B4,A4,03,20,03, 
CC,A4,FC,C4,03,F0,09,n5S, 
FB,88,91,62,C4,03,D0,F3, 
20,CA,B4,4C,F7,AE,4C,48, 
B2,20,FA,AE,20,9E,AD,20, 
A3,B6,85,03,86,FD,84,FE, 
20,FD,AE,20,E0,C4,BA,A6, 
00,F0,03,20,FD,C8,85,FB, 
60,20,C1,CB,20,F3,CB,20,. 
7D,B4,AB,F®,03,20,03,CC, 
4C,B8,CB,A4,03,88,C0,FF, 
F0,06,B1,FD,CS,FB,F®,FS, 
C8,98,60,88,B1,FD,31,62, 
CO,00,D0,F7,60,20,FA,AE, 
20,8A,AD,29,79,00,20,1C, 
CC,4C,F7,AE,C9,29,F0,31, 
20,33,AE,20,F1,B7,86,FB, 
86,FC,A2,00,68,95,61,E8, 
EO,05,D0,F8,F0,03,20,Eo, 
BA,C6,FB,10,F9,20,49,B8, 
20,CC,BC,4C,49,CC,20,FE, 
BA,C6,FC,10,F3,68,85,66, 
69,20,49,B8,20,CC,BC,60, 
20,65,C5,20,45,C5,20,FD, 
AE,20,9E,AD,20,8F,AD,2®, 
A6,B6,C9,29,90,03,4C,58, 
B6,85,FB,A9,28,38,ES,FB, 
4A,18,65,A7,30,04,E6,A8, 
EB, AR, 85,17,85,A9,A0,00, 
B1,22,20,FF,C4,A6,C7,F®, 
02,09,80,20,58,C5,C8,C4, 
FB,90,ED,60,20,8B,B0,AS, 
45,A6,46,8D,3E,03,8E,3F, 
03,49,01,85,FB,2®,FD,RE, 
20,9E,AD,20,8F,AD,20,#6, 
BE,85,FC,86,FD,84,FE,C9, 
00,D0,03,4C,08,AF,20,2C, 
AB,20,24,E1,C9,00,F0,F6, 
AQ,00,85,8C,B1,FD,CS,6C, 
F0,08,C8,C4,FC,30,F5,4C, 


C6,CC,48,20,A5,C4,68,nD, ' 


00,91,62,60,F0,04,20,3£, 
B7,2C,A2,14,84,8D,01,D4, 
A9,OA,A2,0F,80,05,04,8D, 
06,04,8E,18,D4,A9,11,8D, 
04,D4,n2,00,A0,80,C8,Do, 
FD,E8,E0,30,30,F6,A9, 10, 
8D,04,D4,60,20,73,00,20, 
9E,B7,86,D3,4C,AE,A7,D®, 
03,4C,E4,CD,A9,00,80,Ce, 
03,8D,C3,03,A9,15,8D,C4, 
03,A9,18,80,C5,03,A2,FcC, 
20,6A,C5,8E,C0,03,20,FD, 
AE,20,9E,B7,8E,C1,03,20, 
79,00,F0,28,20,FD,AE,R2, 
02,20,64,C5,BD,C®,CE,8D, 
C2,03,BD,C2,CE,80,C4,03, 
20,FD,AE,A2,02,20,64,C5, 
BD,C0,CE,80,C3,03,BD,C4, 
CE,80,C5,03,A0,27,A2,08, 
98,90,F7,07,88,CA,D@,F8, 
BE,10,D0,AD,C2,03,80,17, 
D8,AD,C3,03,80,1D,D®,r9, 
22,80,C6,03,AD,C1,03,3D, 
00,00,30,08,00,E0,06,F®, 
1C,18,60,C5,83,CD,C1,03, 
BO,08,48,AD,10,D0,0D,C6, 
03,8D,10,00,68,E8,E8,0E, 
C6,03,4C,9F,CD,AD,C®,03, 
80,201,00,80,03,D0,80,05, 
D9,80,07,00,18,6D,C4,03, 
80,09,00,80,0B,D0,8D,0D, 
D2,8D0,0F,D®,AS,FF,80,15, 
D2,80,1B,00,60,A9,00,8D, 
15,00,60,20,CB,CE,8D,C1, 
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CDFB 
CEO® 
CEBB 
CE1® 
CE18 
CE28 
CE28 
CE3® 


CE38 


CE4® 
CE4B 
CESO 
CESB 
CESO 
CESB 
CE7®O 
CE78 
CEB® 
CESB 
CE3® 
CESB 
CEAB 
CEAB 
CEBO 
CEBB 
CECO® 
CECB 
CED® 
CEDB 
CEE® 
CEEB 
CEF® 
CEFB 
CFO® 
CFo8 
EF1@ 
CF18 
CF2® 
CF28 
CF3® 
CF38 
CF4O 
CF4B 
CFS® 
CFS8 
CF6O 
CF6B 
CF7® 
CF78 
CF8® 
CF8B 
CF92 


44B® 
4492 
4592 
4S1® 
4528 
4538 
4548 
4550 
4568 
4570 
4588 
4590 
4698 
4610 
4620 
4630 
4649 
4650 
4668 
4670 
4680 
4692 
4708 
4710 
47228 
4738 
4748 
4758 
4760 
4770 
4788 
4738 
4888 
4810 
48208 
4B38 
4848 
4B58 
4B60 
4B70 
48808 
4830 
4908 
4918 
4928 
49338 
4948 
4958 
4968 
4978 
4988 
4938 


690002 


602212 


60022 


690238 
60240 
69058 
62068 
60972 
600880 


72298 


DATA 


03,8E,C0,03,A2,00,AD,C®, 


DAIA 03,C9,18,30,06,38,E9,18, Ce 
DATA E8,D0,F6,80,C0,03,A9,08, DE 
DATA 85, FC,BD,C6,CE,85,FB,AD, 17 
DATA C1,03,C9,15,30,0B,E6,FC, ?F 
DATA AD,C1,03,38,E9,15,80,C1, 55 
DATA 03,AD,C0,03,n2,00,C9,07, 76 
DATA 30,08,F0,06,38,E3,08,E8, B1 
DATA DO,F4,29,07,493,07,AB,A9, 3F 
DATA 01,88,30,03,0A,D®,FA,85, 56 
DATA FD,AD,C1,03,F0,08,0A,18, E7 
DATA 60,C1,03,80,C1,03,8A,18, 52 
DATA 60,C1,03,A8,B1,FB,60,D®, 4E 
DATA 03,4C,08,AF,nA2,03,20,6R, 66 
DATA C5,8E,BE,03,20,F3,CD,AE, 3E 
DATA BE,03,00,05,05,FD,Sı,FB, 23 
DATA 60,E0,02,D0,05,45,FD,91, DF 
DATA FB,60,48,A5,FD,49,FF,85, 6B 
DAIA FD,68,25,FD,31,FB,60,A9, OB 
DATA 20,AA,SD,00,08,39D,00,09, 56 
DATA E8,D0,F7,60,A9,00,An,BD, 43 
DATA 00,08,49,FF,30,00,08,BD, 2B 
DATA 80,09,43,FF,30,00,09,E8, 08 
DATA D0,ED,60,20,68,C5,8A,A2, AE 
DATA 08,90,26,08,CA,DO,FA,60, 56 
DATA 00,FF,15,2A,18,30,00,40, 35 
DATA 80,C0,EA,20,FD,AE,A2,2B, 4F 
DATA 20,64,C5,80,48,20,FD,AE, 67 
DATA A2,61,20,6N,C5,68,60,45, 6F 
DATA 4C,53,05,55,53,49,4E,C7, FA 
DATA 56,50,4C,4F,D4,48,5®,4C, 33 
DATA 4F,D4,50,4F,D®,4F,4C,C4, 85 
DATA 42 ,4F,52P,44,45,D2,47,52, 6A 
DATA 4F,55,4E,C4,49,4E,CB,43, 07 
DATA 4C,D3,44,45,C0,53,45,C3, 73 
DATA 53,47,4F,CE,53,47,4F,46, #3 
DATA C6,53,45,D4,53,47,43,4F, E4 
DATA CC,53,47,43,4C,D3,53,47, 02 
DATA 49,4E,D6,48,49,4E,50,55, 7F 
DATA D4,56,49,4E,50,55,D4,53, F4 
DATA 57,41,D00,43,45,4E,54,45, a9 
DATA D2,43,47,45,D4,42,45,4C, 1B 
DATA CC,49,4E,53,54,D2,43,55, EE 
DATA D4,46,55,4C,CC,52,4F,55, oA 
DATA 4E,C4,00,3A,A9,3E,C9,DF, AS 
DATA C6,98,C6,50,C2,938,C2,09, B3 
DATA C2,F6,C2,04,C3,C5,C4,A3, AB 
DATA CS,1B,C6,26,CD,EC,CD,SE, 99 
DATA CE,B2,CE,8E,CE,3B,CE,35, 27 
DATA C7,SE,C7,0D,C9,57,CC,98, C4 
DATA CC,EB,CC,0F,CB,E®,CB,30, C3 
DATA CB,0C,CC,FF,FF,00,00,00, 8A 
FOR A=-49152 TO 53136 STEP 4168 
8:5=B:C=B2:FOR B=@ TO 7: 

GOSUB 69040 
S=5+H+L-C:0=-5>255:5=255-5 5934 
AND 255:POKE A+B,H+L:NEXT 
B:GOSUB 60049 

F$="PRUEFSUMME OK”: IF S<> 5699 
H+L THEN FS="LRUS] 
PRUEFSUMMENFEHLER”": F=F+1 

GOSUB 69839:NEXT A:PRINT ” 2267 
EDOWNI"F"FEHLER”: END 

READ H$:60SUB 60058: H-L* 2715 
16:H$=MID$ CHS,2) 

L=ASC CHS+"X”)-48: IF L<O 3138 
OR L>22 IHEN 60080 

IF L<1® THEN RETURN 19044 
L=L-7:1IF L>3 THEN RETURN 1334 
FS="LRUSIEINGABEFEHLER":L= 2468 
O:F=F+1 

PRINT ”ZEILE” PEEK (64) * 2726 


eSB+PEEK (63)F$: RETURN 
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Aus eins mach 


Wenn ein Mensch versucht, meh- 
rere Dinge auf einmal zu erledi- 
gen, gerät er schnell durcheinan- 
der. Computer sind da bö&sser 
dran: Ein Großrechner kann Dut- 
zende von Programmen gleichzei- 
tig abarbeiten. Bei diesem Multi- 
tasking springt er viele Male in 
der Sekunde von einer Aufgabe 
zur anderen, Der Wechsel voll- 
zieht sich so schnell, daß der ein- 
zelne Benutzer gar nicht merkt, 
daß er den Rechner noch mit an- 
deren teilen muß. 

Nach dem selben Prinzip arbeitet 
MACH2. Es verdoppelt den C64 
durch eine Basic- und Betriebssy- 
stemerweiterung. Der Rechner 
kann jetzt zwei' Aufgaben gleich- 
zeitig ausführen. Der Bildschirm 
wird zweigeteilt. So hat jedes Pro- 
gramm seinen eigenen Ein- und 
Ausgabebereich. Mit neuen Ba- 
sic-Befehlen werden Daten zwi- 
schen zwei Tasks (Aufgaben, ‚Pro- 
zessen) ausgetauscht. Die beiden 
Programme können dadurch mit- 
einander kommunizieren. Man 
kann also zwei Schachprogramme 
schreiben und sie gegeneinander 
spielen lassen. Ferner lassen sich 
beide Programme durch Setzen 
und Löschen von Warteflags syn- 
chronisieren. 

In einer speziellen Interruptrouti- 
ne werden die Inhalte der Spei- 
cherseiten 0 bis 2 (Speicherzellen 
0--767) ausgetauscht. In diesem 
Speicherbereich sind die Zero- 
Page, der Stack und andere Para- 
meter untergebracht. Damit der 
C64 nicht seine ganze Zeit damit 
verbringt, die drei Seiten hin- und 
herzuschieben, wird nicht bei je- 
dem Systeminterrupt (jede 1/60 
Sekunde) der aktuelle Prozeß ge- 
wechselt, sondern je nach Wahl 
der Prioritäten nach 2—18 Zyklen. 
MACH2 kopiert das Basic- und 
das Kernal-ROM in das parallel 
liegende RAM und stellt dort die 
Systemroutinen auf den Doppel- 


betrieb um. Jede PRINT-Ausgabe - 


erfolgt auf dem Teilschirm des 
entsprechenden Prozesses. PO- 


zwei 


MACHZ verdoppelt 


den Rechner: Durch 


Multitasking laufen 


zwei Programme 


gleichzeitig. 


KEs in den Bildschirmspeicher 
sind hiervon ausgenommen; sie 
werden nicht abgefangen. 
Zwischen den Teilbildschirmen 
befindet sich eine Systemzeile, in 
der die wichtigsten Parameter 
ständig sichtbar sind. SCO bedeu- 
tet, daß die obere Bildschirmhälf- 
te aktueller Eingabeschirm ist. 


Priorität ändern 


Entsprechend steht SC] für die 
untere Hälfte. Mit dem Feuer- 


. knopf des Joysticks in Port 2 kann 


man den aktuellen Eingabeschirm 
wechseln. Die übrigen Parameter 
werden mit Joystick rechts/links 
angewählt. Eine spitze Klammer 
zeigt an, welcher Parameter 
durch eine Joystick-Bewegung 
nach oben oder unten geändert 
wird. Die Größe der Zeitscheibe 
(Priorität des Prozesses) kann mit 
den Parametern PRO/PR] beein- 
flußt werden. Es stehen Prioritäten 
von 1 bis 9zur Verfügung. Je nach 
Priorität steht einem Programm 
ein unterschiedlich großer Anteil 
der Rechenzeit zur Verfügung. 
Für jeden Prozeß kann die RUN- 
STOP-Taste verriegelt werden 
(RSO/RS]). Mit Joystick oben/un- 
ten wird zwischen verriegelt/nicht 
verriegelt gewählt. Die Stop-Taste 
funktioniert bei einem Programm, 
sofern RSO beziehungsweise RS1 
auf Y, wie YES, steht. 

Mit dem !F-Befehl (siehe unten) 
wird die Farbe der Systemzeile 
geändert. 


WWW, HOMECSNPITERWORD COM 


MACH2-Basic ist um folgende Be- 
fehle erweitert: 

ISO Setzen von Stopflag 0. 

!WO Warten bei gesetztem Stop- 
flag 0. 

!C0 Löschen von Stopflag 0. 

IS1, !IW1, !C1: wie 0, bezogen auf 
Stopflag 1. 

II Eingabeschirm auf den laufen- 
den Modus setzen (wird innerhalb 
eines Programmes verwendet, 
zum Beispiel vor INPUT-Anwei- 
sungen). 

IX Wechsel des Eingabeschirms. 
!] Multitasking ausschalten. 

!2 Multitasking reaktivieren. 

!P(X) Schiebt einen numerischen 
Ausdruck in den Kommunikations- 
speicher. 

!USR(0) Holt numerischen Aus- 
druck aus dem Kommunikations- 
speicher. 

IZ Setzt Zeiger des Kommunika- 
tionsspeichers auf Null (Speicher 
löschen). 

IF Farbe der Systemzeile setzen 
(<<), 

RUN STOP/RESTORE kehrt zu- 
rück ins Basic. 

Die Stopflag-Befehle S, W und C 
dienen zum Synchronisieren von 
Prozessen. Jeder der Prozesse 
kann, solange er selbst nicht war- 
tet, Stopflags setzen und löschen. 
Ist Stopflag 0 gesetzt und Prozeß 1 
trifft auf den Befehl !WO, wartet er, 
bis das Stopflag 0 wieder gelöscht 
wird. Nur Prozeß 0 kann das Stop- 
flag zurücksetzen, :.da Prozeß | 
schläft, 

Mit !P(X) wird ein numerischer 
Ausdruck in den Kommunikations- 
speicher geschoben. Dieser bei- 
den Prozessen gemeinsame Spei- 
cher ist nach der Methode first-in- 
first-out (FIFO) organisiert: Daten, 
die zuerst hineingeschoben wer- 
den, werden auch als erstes wie- 
der gelesen. Das Lesen geschieht 
mit dem Befehl USR(0). Mit !I2 kann 
der Speicher gelöscht werden. 
Insgesamt haben 51 Fließkomma- 
zahlen im Kommunikationsspei- 
cher Platz. Führt ein Prozeß einen» 
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Lesezugriff durch, wenn keine Da- 
ten vorhanden sind, so wird er in 
den Wartezustand versetzt, bis 
wieder Daten anliegen. Entspre- 
chend wartet ein schreibender 
Prozeß bei vollem Speicher. 

Zwei kurze Beispielprogramme 
sollen das Zusammenwirken der 
Stopflag-Befehle und die Befehle 
zum Kommunikationsspeicher ver- 
deutlichen: 

Programm 0 (oberer Eingabe- 
schirm) 

10 !S0:!WO 

20 FORI=1TO3 

30 A=USK(0) 

40 PRINT A 
50 NEXT 
Programm 
schirm) 
10OFORI=-1TO3 


l (unterer Eingabe- 


Wechselspiel mit 


doppelten Bildschirm 
irn 


Mit dem Joystick wählt man als ak- 
tuellen Eingabeschirm den obe- 
ren (0) aus und startet das Pro- 
gramm mit RUN. Programm 0 ser- 
viert sich sofort selbst. ab, indem 
es Stopflag 0 setzt (ISO) und an- 
schließend wartet (!WO), bis das 
Stopflag wieder von Prozeß 1 ge- 
löscht wird. Mit dem Feuerknopf 
des Joysticks wählt man nun 
Schirm 1 an und startet Programm 
l. Dieses Programm schreibt die 
Zahlen eins bis drei in den Kom- 
munikationsspeicher (Zeilen 
10—30). Als Zeichen, daß es fertig 
ist, löscht es anschließend Stop- 
flag O0 (ICO). Prozeß O wird dadurch 
wiedererweckt und liest die drei 
Zahlen aus dem Kommunikations- 
speicher aus (Zeilen 30—50). Die 
beiden Prozesse wurden mit Hilfe 
des Stopflags 0 synchronisiert. Stop- 
flag 1 kann exakt gleich verwen- 
det werden. 

Falls ein Prozeß auf ein Stopflag 
oder auf den Zugriff auf den Kom- 
munikationsspeicher wartet, läuft 
der andere Prozeß mit voller Re- 


chengeschwindigkeit. Der war- 


tende Prozeß kann nicht mit der 


Stop-Taste abgebrochen werden. 
Bei der Arbeit mit wartenden Pro- 
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Basic- 


Erweiterung 


zessen ist größte Sorgfalt geboten, 
um nicht das ganze System lahm- 
zulegen. Deshalb erhält man ei- 
nen WAIT ERROR, wenn man ver- 
sucht, beide Prozesse in den War- 
tezustand zu versetzen. Trotzdem 
gibt es bei falscher Handhabung 


Möglichkeiten, einen oder beide: 


Prozesse zu blockieren, so daß 
nur noch RUN STOP/RESTORE 
weiterhilft: ° 

— Liest ein Prozeß ohne Abbruch- 
kriterium ständig Zahlen aus dem 
Kommunikationsspeicher, so wird 
er bei Abbruch des zweiten Pro- 
zesses, der die Daten liefert, stän- 
dig im Wartezustand bleiben. 

— Schaltet das Programm, das im 
oberen Schirm abläuft, Multitas- 
king ab (!l) und ist der untere 
Schirm Eingabeschirm, ist das 


System nach Abbruch des ersten’ 


Prozesses tot. Grund: Aktueller 
Eingabeschirm ist 1 und der wur- 
de von Schirm 0 abgeschaltet. Es 
kann also keine Eingabe mehr 
vorgenommen werden. Im Pro- 
grammodus sollte man immer !I:!1 
eingeben, um zu gewährleisten, 
daß der aktuelle-Schirm auch an- 
gewählt ist. 

Um Komplikationen z zu vermeiden, 
sollte man das Multitasking in je- 
dem Fall ausschalten, wenn Daten 
auf den Drucker gegeben wer- 
den, wie im folgenden Beispiel: 
!1:OPEN 4,4: CMD4:LIST 

PRINT #4:CLOSE4:!2 


LOAD modifiziert 
ee me 


Ein ähnliches Verfahren verwen- 
det MACH2 bei den LOAD- und 
SAVE-Routinen automatisch. Eine 
Modifikation der LOAD-Routine 
verhindert beim Laden von Basic- 
Programmen in den unteren der 
zwei Speicherbereichen, daß die 
Obergrenze dieses Bereiches 
überschrieben wird. Der Ver- 
such, ein zu langes Programm zu 
laden, wird mit einem LOAD OUT 
OF MEMORY ERROR geahndet. 
Für Maschinenprogramme gilt 
diese Einschränkung nicht. 

Wird MACH2 mit RUNSTOP/RE- 
STORE verlassen, setzt man es 
wieder in Betrieb mit: 


WWW HOMNEEOMPUTERWERLB: COM 


— LOAD"MACH2.LADER“, 8 

— GOTO 410 

Wenn MACH2-Befehle ER ei- 
nem THEN stehen, muß hinter 
dem THEN erst ein Doppelpunkt 
folgen. 
DEMOO (Listing 3) und DEMO] 
(Listing 4) sind zwei Demopro- 
gramme für MACH2. Sie laufen 
parallel: Zuerst DEMO] in den un- 
teren Bildschirm laden und mit 
RUN starten. Es erfolgt die Auffor- 
derung, DEMOO zu laden und zu 
starten. Das geschieht im oberen 
Bildschirm. Nun erklären die bei- 
den Programme im Wechselspiel 
die Möglichkeiten von MACH2. 


Speicherplatz frei 


aufteilbar 
Beer 


Das Programm besteht aus einem 
Basic- und einem Maschinenspra- 
cheteil. Der Basicteil, MACH2.LA- 
DER (Listing 1), lädt automatisch 
das Maschinenprogramm MACH2. 
C000 nach, das mit diesem Namen 
auf Diskette vorhanden sein muß, 
Dann fragt es nach der Verteilung 
des Speicherplatzes zwischen den 
beiden Prozessen. Anschließend 
initialisiert es das System. 

Der Maschinenspracheteil ist als 
kombinierter Hexdump-Basicla- 
der abgedruckt (Listing 2). Wie 
man mit dieser Art von Listing um- 
geht, steht auf Seite 6. Wird das 
Programm als Basiclader einge- 
geben, so kann das fertige Ma- 
schinenprogramm nach dem Ein- 
poken der Daten mit 


POKE 43, 0:POKE 44,192 
POKE 48,130:POKE 46,199 
SAVE "MACH2.C000",8 


auf Diskette abgespeichert wer- 
den. Wird es als Hexdump einge- 
geben, muß der Checker benutzt 
werden. Als Startadresse ist C000 
anzugeben. 

MACH2 belegt den Dei 
reich von $C000 bis $C781. Der 
Speicherbereich von $A000 bis 
$FFFF ist für den Anwender nicht 
freigegeben. 


(Jürgen Mühlbach) EEE 


Erweiterung 


PRINT CHR& (147) "LRUSI*#+*+L4SPACESI 
MULTITASKING AUF DEM CE4L4SPACESI**=«* . 


EOFFI” 

IF A=1 THEN 41@ 

A=1:LDAD "”MACH2.COOO”,8,1 

PRINT :PRINT ”CDOWN, 2SPACESIES STEHEN 
INSGESAMT 152 PAGES ZU” 

PRINT "CDOWN,2SPACESI256 BYTE AN 
SPEICHER ZUR VERFUEGUNG.” 

PRINT "CDOWN, 2SPACESJIWIEVIELE PAGES 


Listing 1: MACH2.LADER 


c000 
cooa 
co1® 
co18 
co2o 
co28 
c030 
Co38 
co4Do 
coHB 
cos® 
cos8 
coso 
CosB 
C070 
ca78 
CO80 
CoBB 
coso 
cosa 
Cord 
Cora 
CoBo 
CoBB 
ceco 
coc8 
con® 
conB 
COEO 
COEB 
Cor 
cor8 
C100 
c108 
c119 
cı18 
C120 
C128 
C130 
c138 
C140 
c148 
c150 
cı158 
C160 
C168 
C170 
c178 
C180 
c188 
C190 
cı98 
CiA® 
ciA8 
C1BO 
CıBB 
c1co 
c1c8 
c1Do 
cıD8 
C1EO 
C1EB 
CIFO 
CIFB 
c200 
c208 
c210 
c2ı8 
C220 
C228 
C230 
c238 
c240 
c248 


20,07,C0,20,32,C0,60,r2, 
0C,86,D6,N2,00,86,03,20, 
6C,ES,A9,37,A0,C7,20,1E, 
AB,20,0B,C1,49,35,85,01, 
A9,00,A2,18,30,69,C7,Ca, 
10,FA,A2,01,8E,6B,C7,A8, 
06,R2,03,30,78,C7,CA,1®, 
FA,AS,3C,80,76,C7,n3,4C, 
8D,3A,FS,80,5E,E5,8D,36, 
.E8,8D,66,E5,8D0,01,E7,8D, 
7B,EA,AS,FF,80,3B,F5,#9, 
C1,8D,9C,F5,A9,AF,BD,5F, 
ES,A9,C6,80,60,E5,A3,D8, 
8D,37,E8,49,C6,8D,38,E8, 
A93,C9,80,67,E5,A9,C6,80, 
68,E5,A9,F0,80,02,E7,#S, 
C6,80,03,E7,R9,83,8D,7C, 
EA,A3S,C6,8D0,7D,En,20,41, 
C1,60,78,A9,3F,8D,14,93, 
A9,C0,80,15,03,58,60,CE, 
76,C7,F0,03,4C,31,EA,A2, 
02,BD,31,C7,30,77,02,E8, 
EO,06,D0,F5,86,C6,8E,80, 
C7,A2,00,B5,00,30,00,CD, 
BD,20,01,90,20,CE,BD,00, 
02,30,20,CF,E8,D®,EC,#5, 
37,18,69,02,85,FE,A9,00, 
65,38,85,FF,18,A5,FE,683, 
01,8D,2B,CD,A9,00,65,FF, 
8D,2C,CD,AS,FE,8D,37,CD, 
AS,3F,8D,38,CD,R®,00,38, 
31,FE,A9,B1,8D,14,03,#9, 
C3,80,15,03,BA,BE,75,C7, 
4C,31,EA,28,30,C1,R9,BF, 
A2,AD,20,3R,C1,20,BF,n3, 
AS,E®,BD,FF,BF,20,30,C1, 
AS,FF,A2,E®,20,34,C1,20, 
BF,A3,A9,FF,8D,FF,FF,50, 
A2,00,86,5F,CA,86,5A,86, 
58,60,85,5B,85,59,86,60, 
60,49,8E,8D,30,03,A3,C1, 
8D0,31,03,49,38,80,11,03, 
AS,C3,80,12,03,49,86,8D, 
18,03,A9,EA,8D,19,03,#3, 
17,8D,32,03,A9,C2,80,33, 
03,A9,25,80,08,03,A3,C2, 
8D,09,03,60,78,A9,31,6D, 
14,03,A9,EA,8D0,15,03,58, 
60,78,A49,B1,8D0,14,03,A8, 
C3,80,15,03,58,60,85,33, 
20,74,C1,A5,89,F®,1A,A9, 
24,8D,24,F5,A9,90,8D,25, 
FS,A9,50,80,26,F5,20,A7, 
F4,08,48,20,81,C1,68,28, 
60,A9,4C,8D,24,F5,A9,C3, 
80,25,F5,A9,C1,8D,26,F5, 
4C,A6,C1,08,15,38,C5,AF, 
DO,2A,AS,37,C5,AE,D0,24, 
28,20,EF,ED,20,42,F6,A9, 
60,80,7E,n6,20,44,A6,nS, 
68,80, 7E,AB,20,87,A6,n3, 
03,R0,C7,20,1E,AB,20,81, 
C1,4C,31,AB,28,24,30,50, 
03,4C,2B,F5,4C,F3,F4,A5, 
B9,F0,07,45,C3,85,C1,4C, 
SE,F5,38,45,37,ES,AE,#S, 
38,ES,AF,B®,EE,30,C0,20, 
74.C1.20.ED.F5.08.48.20. 
81,C1,68,28,60,20,73,00, 
C9,21,F0,03,4C,E7,A7,20, 
73,80,C3,58,D8,08,43,01, 
BD, 6A,C7,4C,65,03,C9,49, 
D®,OF,AD,693,C7,80,6B,C7, 
18,69,B8,80,E6,05,4C,65, 
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WOLLEN SIE FUER 

INPUT ”"CDOWN, 2ZSPACESIPROGRAN 8 
RESERVIERENE2SPACESICI-151] ";2B 
IF ZB<1 OR 2B>151 GDTO 418 
ZB=Z2B+PEEK (44) 

POKE 56,2B 

POKE SS,PEEK (43) 

SsyS 49152 

PRINT CHRS (147) 

NEW 


3855 


1719 
1271 
807 
822 
788 
9564 
162 


C3,C9,53,00,0B,20,76,C3, 
AS,01,99,60,C7,4C,65,C3, 
‚c9,43,D0,1F,78,20,76,C3, 
A9,00,99,60,C7,C8,38,49, 
FF,AA,2D,6F,C7,80,6F,C7, 
8A,2D,70,C7,80,70,C7,58, 
4C,65,C3,C9,57,00,2D,78, 
AS5,9D,F®,06,58,A3,15,4C, 
3B,A4,20,76,C3,B9,60,C7, 
D®,04,58,4C,65,C3,C8,20, 
88,C3,98,1D,6F,C7,9D,6F, 
C7,AA,CA,58,BD,60,C7,08, 
FB,4C,65,C3,C9,31,D0,06, 
20,74,C1,4C,65,03,C9,32, 
D0,06,20,81,C1,4C,65,C3, 
C9,50,D0,39,78,AD,71,C7, 
C9,33,D0,0E,20,88,C3,20, 
95,C3,58,AD,71,C7,03,33, 
FO,F9,20,3E,C3,20,73,00, 
20,F1,AE,20,8D,AD,n2,04, 
AC,72,C7,B5,61,39,81,C7, 
C8,CA,180,F7,8C,72,C7,EE, 
71,C7,4C,AE,A7,C9,5A,D®, 
0E,AS,00,80,73,C7,8D,72, 
C7,8D,71,07,4C,65,C3,C9, 
46,F0,03,4C,AE,n7,20,73, 
00,20,F1,AE,20,80,AD,20, 
AA,B1,98,38,E3,80,29,0F, 
A2,27,3D,E0,03,CA,10,FR, 
YC,AE,A7,78,AD,71,C7,08, 
©C,20,88,C3,20,35,C3,58, 
AD,71,C7,F®,FB,20,3E,C3, 
A2,04,AC,73,C7,B9,81,C7, 
95,61,C8,C#,10,F7,8C,73, 
C7,CE,71,C7,60,20,73,00, 
YC,AE,A7,A9,24,A0,C7,20, 
1E,AB,58,4C,31,AB,20,73, 
02,38,E3,30,F0,08,C9,01, 
F0,04,58,4C,08,AF,AB,60, 
AE,69,C7,5BD,6F,C7,D0,DB, 
8A,49,01,AA,60,A9,04,1D, 
6F,C7,30,6F,C7,60,78,#9, 
FB,2D,6F,C7,80,6F,C7,#9, 
FB,2D,70,C7,80,70,C7,58, 
60,AE,69,C7,DE,78,C7,0®, 
08,BD,7A,C7,30,78,C7,0®, 
03,4C,31,EA,AE,02,0C,#8, 
F4,8D,82,DC,AD,00,DC,ED, 
7F,C7,8E,02,DC,C9,7F,D®, 
03,4C,B6,C4,29,10,00,08, 
A9,01,80,64,C7,4C,B6,C4, 
AD,7F,C7,29,08,D00,21,AC, 
7E,C7,C0,03,00,03,4C,B6, 
C4,BE,61,C7,R9,n®,9D,ED, 
05,EE,7E,C7,C8,BE,61,C7, 
AS,BE,9D,E0,05,4C,B6,C4, 
AD,7F,C7,29,04,D®,1F,AC, 
7E,C7,D8,03,4C,B6,C4,BE, 
61,C7,A9,A0,39D,E®,05,CE, 
7E,C7,88,BE,61,C7,A9,BE, 
SD,EO,05,4C,B6,C4,AD,7F, 
C7,29,01,00,3B,AE,7E,C7, 
FO,04,E0,01,D0,1C,BD,7A, 
C7,C9,12,F0,69,4A,18,63 
01,AB,0A,3D,7A,C7,38,6C, 
65.C7.18.69.B0.39,E0.05. 
DO,54,BD,7A,C7,C9,01,F0, 
4D,49,01,90,7A,C7,BC,65, 
C7,#9,8E,39,E0,05,D0,3E, 
AD,7F,C7,23,02,008,37,#E, 
7E,C7,F®,04,E0,01,D0,1C, 
BD, 7A,C7,C9,02,F0,27,4n, 
38,E9,01,A8,04,3D,74n,C7, 
S8,BC,65,C7,18,69,B0,383, 
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Listing 2: Kombinierter Hexdump-Basiclader von MACH2 


vouonzwne 


Basic- 


Erweiterung 


C4AD 1490 DATA EO,05,00,12,BD,7A,C7,Fo, 
C4HAB 1500 DATA 0D,AS,00,30,7A,C7,BC,65. 
C4BO 1510 DATA C7,A9,99,39,E0,05,RD.En. 
C4BB 1520 DAIA C7,F@,1A,AD,6B,C7,F0.07. 
C4CO 1539 DATA AS,00,80,64,C7,F®,05.8D. 
C4CB 1542 DATA 64,C7,A9,01,80,68.C7.18. 
C4DO 1559 DATA 69,50,80,86,05,AE,69,C7. 
C4D8 1568 DATA BD,6F,C7,F0,03,4C,78,C6. 
C4HE®O 1578 DATA 8A,49,01,80,69,C7,F0,03, 
CHEB 1588 DATA 4C,AF,CS,AS,CS,80,77.C7, 
C4F®O 1598 DATA A2,76,B5,00,30,00,CD,BD, 
C4F8 1600 DATA 00,C4,95,00,8D0,00,01,3D. 
C508 15610 DATA 00,CE,BD,00,CB,3D,00,01, 
C508 1628 DATA BD,00,02,30,00,CF,BD,00. 
C510 1630 DATA CC,9D,00,02,CA,10,DB,n2, 
C518 1640 DATA 09,B5,77,90,77,CD,BD,77. 
C52® 1659 DATA CA,95,77,BD,77,01,30,77. 
C528 1660 DATA CE,BD,77,CB,3D,77,01.Ca. 
C530 1570 DATA 10,E7,A2,3D,85,81,SD.81. 
C538 1689 DATA CD,BD,81,CA,95,81,BD.81. 
C540 1698 DATA 01,90,81,CE,BD,81,CB,3D. 
C548 1700 DATA 81,01,B0,81,02,39D,81.Cr. 
C550 1718 DATA BD,81,CC,30,81,02,C#A.ı®. 
C558 1720 DATA DB,A2,3E,B5,C1,3D,.C1.Co. 
C560 1730 DATA BD,C1,CA,95,C1,BD,C1,01, 
C568 1748 DAIA SD,C1,CE,BD,C1.CB.sD.Cı. 
C570 1750 DATA 01,CA,10,E7,AD.Ce.01,80. 
C578 1768 DATA CO,CD,AD,C®,CA,80,C0,01. 
C588 1778 DATA AD,77,C07,85,C5,A2.08.BE. 
CS88 1788 DAIA 04,ES,BE,70,E9,E8.BE.B2. 
C5938 17398 DATA EB,8E,D0,E6,8E,8E.E3.BE. 
CS938 1800 DATA C5S,EB,A2,0On,BE,AA,ES.AsS. 
CSADB 1819 DATA FF,8D,F7,EB,BA,8E,75,C7. 
CSAB 1828 DATA AE,74,C7,9A,4C,70,C6,RS. 
C5B0 1830 DATA C5,80,77,C7,A2,76,B5,00. 
CSBB 1849 DATA 90,00,CA,BD,20,CD,s5.00. 
CSC® 1850 DATA BD,20,01,30,90,CB,BD,00, 
CSCB 1860 DAIA CE,SD,020,01,BD,20,02.=n. 
C5D® 1878 DATA 00,CC,BD,02,CF,SD,00.02. 
ESD8 1888 DATA CA,10,0B,A2,09,85,77,3D. 
CSEO 1838 DATA 77,CA,BD,77,CD,35.77.B0. 
CSE8 1900 DATA 77,01,30,77,CB,BD,77.CE. 
ESF8 1918 DATA SD,77,01,CA,10,E7,R2.3D. 
CSF8 1929 DATA B5,81,90,81,CA,BD,81.c0, 
C60® 1930 DATA S5,81,BD,81,01,3D,81,CB. 
C608 1940 DATA B0,81,CE,90,81,01,BD.81. 
C610 1950 DATA 22,30,81,CC,BD,81.CF.an. 
C618 1960 DATA 81,02,CA,10,DB,A2,3E,Bs. 
C622 1970 DATA C1,3D,C1,CA,BD,Cı,CD.ss. 
C628 1988 DATA C1,BD,C1,01,30,C1,CB.En. 
C630 19908 DATA C1,CE,SD,C1,81,CA.10,E7. 
C638 2080 DATA AD,C0,01,80,C0,Ca,.AD.co. 
C640 2010 DATA CD,80,C0,01,AD,77,C7,8s. 
E64B 2920 DATA C5,A2,18,8E,04,E3,8E,70, 
C650 2030 DATA ES,E8,8E,82,E8,8E.00,E8. 
C65B 2940 DAIA BE,BE,ES,8E,CS,EB.A2,17, 
C6EdO 2050 DATA BE,AA,ES,AS,0C,80,F7.EB. 


REM DEMD® Zu MACH2 
REM 

PRINT "CCLRI” 

GOSUB 134: REM DEMO®D TITELBILD 

!C1:G0SUB 185: PRINT "CCLRI” 

ıc1 

PRINT ” ICH WERDE IHNEN JETZT DIE 

PRINT :PRINT ” ERWEITERTEN MDEGLICHKEITEN 
PRINT :PRINT " DES LRUSIMACH2LOFFI 
BETRIEBSSYSTEMS 

PRINT :PRINT ” AN HAND EINIGER BEISPIELE 
PRINT :PRINT "” DEMONSTRIEREN 

GOSUB 185 

!C1:1S@:!WO:REM 1 WEITER, ® HALT 

IC1:1S0 ! 

PRINT "CCLR,DOWNI MIT DEM FEUERKNOPF WIRD 
DER BILDSCHIRM 

PRINT ” AUF DEM DIE EINGABE ERFOLGT, 

PRINT ” UMGESCHALTET. 

PRINT :PRINT ” LRUSISC OLOFFI = EINGABE AUF 
SCHIRM @ 

PRINT ” CRUSISC 1COFFJ = EINGABE AUF SCHIRM 
1 

PRINT :PRINT " BETAETIGEN SIE DEN 
FEUERKNOPF 

PRINT ” UND ACHTEN SIE AUF DIE ANZEIGE 

!Wo 

PRINT ”"LELR,DDWNJ ALS WEITERE PARAMETER 
LASSEN SICH 
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CE58 2060 DATA BA,BE,74,C7,AE,75,C7,9n, 
‚C670 2070 DATA A2,01,8E,60,C7,AE,59,C7, 
C678 2080 DATA BD,7C,C7,F0,04,A9,60,D0, 
C682 2030 DATA 22,A9,AD,80,BC,F6,4C,31, 
C688 2100 DATA EA,AD,69,C7,4D,6B,C7,48, 
C632 2110 DATA 4D,6C,C7,F0,05,AD,80,C7. 
[638 2120 DATA 85,C6,20,87,EA,AS,C6,8D, 
C6AB 2130 DATA 89,C7,A2,00,BE,6C,C7,68. 
EEAB 2140 DATA F0,02,86,C6,4C,7E,EA,AE, 
C6Bd 2150 DATA 69,C7,00,08,A2,0B,20,FF, 
C6BB 2160 DATA E9,CA,10,FA,EB,F®,11,no. 
C6CO 2170 DATA 18,20,FF,E9,Ch,EO,0C,00, 
C6CB 2188 DATA F&,AE,69,C7,F0,02,A2,0D, 
C6D0O 2190 DATA 86,06,A2,08,86,D3,4C,6C, 
CED8 2200 DATA ES,AE,69,C7,D0,0n,n6,D6, 
CBEO 2210 DATA F0,03,4C,3A,E8,4C,71,E8, 
CEEB 2220 DATA AB,D6,E0,00,F0,F7,DO,Fe, 
CEF®O 2230 DATA AE,69,C7,00,0n,A6,06,00, 
CEFB 2240 DATA 03,4C,05,E7,4C,0B,E7,nG, 
C700 2250 DATA D6,E0,00,00,F7,A2,00,Fo, 
C708 2260 DATA F0,0D,3F,4C,4F,41,44,20, 
C710 2270 DATA 4F,55,54,20,4F,46,20,4D, 
C718 2280 DATA 45,4D,4F,52,59,20,45,52, 
L720 2290 DATA S2,4F,52,00,0D,3F,57,41, 
C728 2308 DATA 49,54,20,45,52,52,4F,5S2, 
C730 2318 DATA 00,33,4E,45,57,0D,33,12, 
C738 2328 DATA 29,20,20,53,43,20,31,20, 
C740 2338 DATA 20,50,52,30,3E,33,20,20, 
C748 2342 DAIA 50,52,31,20,33,20,20,52, 
L750 2358 DATA 53,30,20,59,20,20,52,53, 
C758 2368 DATA 31,29,59,20,20,20,20,20, 
C76®0 2378 DATA 00,0C,13,1A,21,0D,14,1B, 
C768 2388 DATA 22,00,00,01,00,00,00,00, 
C770 2338 DAIA 90,00,00,00,00,00,00,00, 
C778 2402 DATA 06,06,06,06,00,00,00,00, 
L789 2410 DATA 00,00,00,00,20,00,00,00, 


3F 
7D 
o4 
SB 
40 
ca 
DE 
DB 
B7 
= 
SD 
34 
6E 
ES 
6E 
22 
79 
AB 
2]:] 
el] 
07 
on 
21 
39 
CD 
44 
e1 
FD 
Fo 
E3 
4a 
FA 
e1 
008 
28 
20 


60000 FOR A-43152 TOD 51072 STEP 4088 


8:5=®:C=®:FOR B=® ID 7: 
GOSUB 6909492 


59210 S-S+H+L-C:10=S>255:5=255-5 5234. 


AND 255:POKE A+B,H+L:NEXT 
B:6DSUB 69949 


60020 FS-"PRUEFSUNMME OK”: IF 5<> 5633 


H+L THEN FS="LERUS] 
PRUEFSUMMENFEHLER”: F=F+1 


50839 GOSUB 608398: NEXT A:PRINT ” 2267 


EDOWNI”F"FEHLER”: END 


50040 READ H$:G0SUB 69959: H=L* 2715 


15:H$=-MIDS CHS,2) 


6090598 L-ASC CHS+”X”)-4B: IF L<O 3198 


OR L>22 THEN 500890 


E006B IF L<1@ THEN RETURN 1244 
50078 L=L-7:1IF L>S THEN RETURN 1334 
600880 FS="LRUSIEINGABEFEHLER”:L= 2468 


®:F=F+1 


60038 PRINT "ZEILE" PEEK cB4)J* 2726 


ESE+PEEK (63)FS$: RETURN 


PRINT ” MITTELS JOYSTICK DIE PRIORITAETEN 
DER 

PRINT " PROGRAMME 

PRINT :PRINT " ERUSIPROLOFFI UND LRUSIPRI 
COFF] 

PRINT :PRINT "” 
RUN/STOP 
PRINT " TASTE FUER PRG O0 BZW 1C2SPACESI 

STEUERN : 

PRINT :PRINT ” CRUSIRSOLOFFI UND CRUSIRSI 
COFF) 

!S9: 140 

PRINT "CCLRI” 

PRINT :PRINT ” IM FOLGENDEN WERDE ICH IHNEN 
DIE 

PRINT ” WIRKUNG DER PRIORITAET 
DEMONSTRIEREN. 

PRINT :PRINT ” DRUECKEN SIE BITTE JOYSTICK 
LINKS, 

PRINT ” BISL2SPACESIDER PROMPT AUF LRUSIPRO 
COFFJ STEHT. 

PRINT ” MIT JOYSTICK OBEN WIRD DIE 
PRIORITAET 

PRINT ” ERHDEHT C MAXIMUM = 9 ), 

PRINT ” MIT JOYSTICK UNTEN ERNIEDRIGT 

PRINT ” C MINIMUM = 1 >. 

159:!W8 

FOR I=1 TO 10908:PRINT I:NEXT I 

PRINT "CCLR,DOWN] ANALOG GESCHIEHT DAS 


SOWIE DIE VERRIEGELUNG DER 


Basic- 


Erweiterung 


VERRIEGELN 


43 PRINT " BZW. ENTRIEGELN DER RUN/SIOP TASTE 4265 187 PRINT ”"CCLR,2DOWN] MIT !FcX) WIRD DIE FARBE 2788 
B DER 
44 PRINT :PRINT ” MIT JOYSTICK LINKS/RECHTS 3832 188 PRINT ” SYSTEMNZEILE GEAENDERT. 2634 
ANWAEHLEN, 189 PRINT :PRINT ” BEISPIEL : 1371 
45 PRINT ” MIT CURSOR DBEN/UNTENL2SPACESIVER- - 4594 118 PRINT ” FOR I=8 IO 15 -: IFcH) NEXTI „3104 
/ENTRIEGELN, 111 FOR I-® TO 15:!FCI1):GOSUB 182:NEXT I B255 
46 PRINT ” CRUSIYLOFFJ RUN/STOP ERLAUBT 2164 112 GOSUB 185:!FC1):REM WIEDER WEISS 1359 
47 PRINT :PRINT ” CRUSINLOFFJ RUN/STOP 39846 113 PRINT "CELRI": IcC1 875 
IGNDRIERT. 114 PRINT :PRINT ” DAS ERUSINACHELOFFI - 3998 
48 !1:G05SUB 185 622 BETRIEBSSYSTEM BEINHALTET 
49 PRINT ”"CELRI”:!C1 875 115 PRINT ” EINEN FIFO-SPEICHER, DER VON 3920 
S® PRINT :PRINT ” WENDEN WIR UNS JETZT DER 2231 1156 PRINT ” PROGRAMMEN IN SPEICHERBEREICH ® UND 4103 
51 PRINT :PRINT ” LRUSIMACH2LOFFI - 3528 1 
BEFEHLSERWEITERUNG ZU. 117 PRINT ” BENUTZT WERDEN KANN, UM ZAHLEN 32806 
52 PRINT :PRINIT ” CRUSIMACHZLOFFI STELLT IHNEN 3347 118 PRINT ” ZWISCHENZUSPEICHERN ODER UM ZAHLEN 3758 
14 NEUE 119 PRINT ” SCHNELL ZWISCHEN 2 PROGRAMMEN 3143 
53 PRINT ” BASIC-BEFEHLE, DIE IM ZUSAMMENHANG 3135 128 PRINT ” AUSZUTAUSCHEN 1594 
54 PRINT ” MIT DEM MULTITASKING STEHEN, 3236 121 PRINT :PRINT ” !PCcX) SCHIEBT DEN WERT VDN X 3745 
55 PRINT ” ZUR VERFUEGUNG. 1880 AUFS FIFO 
56 !50:!W90 864 122 !C1:!59:!W9 1136 
57 PRINT "CCLR,DOWNI ERUSIMACHZCOFFI - 2765 123 PRINT "CCLR,2DOWNJ DEMO® LIEST JETZT DATEN 3183 
SYSTEMBEFEHLE” AUS DEM 
58 PRINT :PRINT ” LRUSJ!XLOFF,2SPACESJIWECHSEL 3599 124 PRINT ” FIFO, BIS EINE NULL UEBERTRAGEN 41903 
DES EINGABESCHIRNS WIRD : 
593 PRINT " CRUSI!ICOFF ,2SPACESIEINGABESCHIRN = 43904 125 PRINT ” UND GIBT DIE ZAHL AUF DEM 3167 
LAUFENDES PROGRAMM BILDSCHIRM 
60 PRINT ” CRUSIISOLOFFI, LRUSI!SICOFFI SETZEN 3604 126 PRINT " AUS. 6893 
DER STOPFLAGSL3SPACESI®, 1 127 A=USR (8):PRINT ” WERT ";A;" ERHALTEN 2636 
61 PRINT ” ERVSI!COLOFFI, CRUSIICILOFFI 3217 128 IF A><® GDTD 127 832 
LOESCHEN DER STOPFLAGS 2, 1 123 PRINT :PRINT ” JETZT WIRD TEXT GELESEN UND 14287 
‚62 PRINT ” ERUSI!WOLOFFI, LRUSI!WILOFFI WARTEN 4291 AUSGEGEBEN 
FALLS STOPFLAG GESETZT 130 PRINT,” AUF DEM UMWEG UEBER DIE CHRS- 4423 
63 PRINT "” CRUSI!1LOFF , 2SPACESIUMSCHALTEN AUF 3765 FUNKTION. ”:PRINT 
SINGLE-TASK MODUS 131 A=USR (@):PRINT CHRS CA); 1375 
64 PRINT ” CRUSI!2LOFF , 2SPALESIUMSCHALTEN AUF 4003 132 IF A<>13 GOTO 131 1136 
MULTI-TASKL2SPACESINODUS 133 PRINT :PRINT "CDOWNJENDE DER DEMO”:END 1754 
65 150: !W8 864 134 REM DEMO-TEXT 
65 PRINT ”"CCLR,2DOWNI IXLC3SPACESIWIRKT WIE 3799 135 PRINT CHRS (19): PRINT 1123 
JOYSTICK - FEUERKNOPF 136 PRINT "C2SPACESIDDDD"” 639 
67 PRINT :PRINT ” | IC3SPACESISCHALTET DEN 3214 137 FOR I-1 70 6 886 
EINGABESCHIRM AUF 138 PRINT "L2SPACESIDL3SPACESID” 582 
68 PRINT " DAS LAUFENDE PROGRAMM UM. 2375 139 NEXT I 276 
69 PRINT ” DAS GESCHIEHT 2. B. IN 4953 148 PRINT "C2SPACESIDDDD" 639 
PROGRAMMZEILE 141 GOSUB 182:REM TIME 771 
7@ PRINT ” 71 !I 733 142 !50:!C1:!W9:REM 1 WEITER, ® HALT 1435 
zı 11 179 143 PRINT CHRS (19): PRINT 1123 
72 PRINT " VON DEMO®. RESULTAT :[2SPACES,RUSI 3512 144 PRINT TABC10)"EEEEE" 1251 
SCLOFFJ = 8" 145 PRINT TAB(C19)”E” 861 
73 GOSUB 185 632 146 PRINT TABC10)"E” 861 
74 PRINT :PRINT ” IN PROGRAMMZEILE 1738 147 PRINT TABC1O)"EEEE”" 1349 
75 PRINT ” 77 !XL7SPACESIWIRD 1433 148 FOR I=1 10 3 7398 
76 PRINT ” DER SCHIRM UMGESCHALTET :C2SPACES, 3510 149 PRINT TABC10)"E" 861 
RUSISCLOFF] = 1 158 NEXT I 276 
77 !X:!C1:150:!W0 1363 151 PRINT TABC19)"EEEEE" 1251 
78 PRINT "CCLR,DOWNI DURCH ANWENDEN DIESER 4240 152 GOSUB 182:REM TIME FIX 
GLOBALEN FLAGS 153 !S®:!C1:!W®:REM 1 WEITER, ® HALT 1435 
73 PRINT ” LASSEN SICH 2 PROGRAMME, WIE HIER 3189 154 PRINT CHRS (19): PRINT 1123 
88 PRINT ” DEMO® UND DEMO1, IM ABLAUF 2881 155 PRINT TABC17)"MLSSPACESIN” 1423 
81 PRINT ” SYNCHRONISIEREN. 2053 156 PRINT TABC17)"MML3SPACESIMNM" 1678 
B2 PRINT ” DAS SIEHT MAN SCHOEN AM AUFBAU DER 3425 157 PRINT TABC17)"M M M HM" 1393 
83 PRINT ” PROGRAMMTITEL : 19856 158 PRINT TABC17)"ML2SPACESINLESPACESINM” 1513 
B4 PRINT ” ES WIRD IMMER ABWECHSELND EIN 3381 159 FOR I=1 TO 4 822 
BUCHSTABE 168 PRINT TABC17)"MESSPACESINM" 1423 
85 PRINT ” IN DEMO®B UND IN DEMDI AUFGEBAUT. 39108 161 NEXT I 276 
86 GOSUB 185: PRINT ”LCCLRI”:GOSUB 134 1783 162 GOSUB 182:REM TIME 771 
87 IC1:G0OSUB 185: !C1 1268 163 !S®:!C1:!WO:REM 1 WEITER, ® HALT 1435 
88 PRINT "CCELR,2DOWNI ANMERKUNGEN 1984 164 PRINT CHRS C19):PRINT 1123 
89 PRINT ” DAS SIMULTANE WARTEN ZWEIER 3685 165 PRINT TABC27)”000” 1348 
PROGRANME 1656 FOR I=-1 10 6 BB6 
98 PRINT ” IST NICHT ZULAESSIG,DA SICH Das 3533 167 PRINT TAB(C26)"OL3SPACESIO” 1216 
SYSTEM 168 NEXT I 276 
81 PRINT ” IN DIESEM FALL IN EINER UNENDLICHEN 3794 169 PRINT TAB(C27)”000” 1348 
92 PRINT ” SCHLEIFE BEFAENDE. 1999 178 GODSUB 182:REM TIME 771 
93 PRINT ” DIESEL2SPACESIBEDINGUNG FUEHRT ZU 3488 171 !S®:!C1:!W@:REM 1 WEITER, ® HALT 1435 
EINEM 172 PRINT CHRS (13):PRINT 1123 
s4 PRINT ” TWAIT ERROR 1586 173 PRINT TAB(35) "009" 963 
935 PRINT ” AUSSERDEM IST WARTEN IM DIREKTMDDUS 3704 174 PRINT TABC34) "®OL2SPACESIOO” 1168 
S5 PRINT " NICHT ERLAUBT, UND FÜEHRT ZU EINEN 3338 175 PRINT TABC34)J"OL2SPACESI00” 1168 
97 PRINT ” TILLEGAL DIRECT ERROR 2502 176 PRINT TAB(34)"”0 8 9” 1152 
98 GOSUB 185 632 177 PRINT TABC34)”O 0 0” 1152 
893 PRINT ”"LCLR,2DOWNI MIT !1 KANN DAS 2388 178 PRINT TAB(C34) ”O8L2SPACESIO” 1144 
MULTITASKING 179 PRINT TAB(34) "08L2SPACESI2” 1144 
1008 PRINT ” ABGESCHALTET WERDEN, MIT !2 2502 180 PRINT TAB(35)"900” 963 
181 PRINT " WIRD ES REAKTIVIERT, 2313 181 RETURN ı42 
102 PRINT :PRINT ” DER EINSATZ DIESER BEFEHLE 3053 182 T-TI:REM 1/2 SEC VERZOEGERUNG 503 
IST ZU 183 IF TI-T<15 GOTO 183 1466 
103 PRINT ” EMPFEHLEN BEI ZEITKRITISCHEN 3717 184 RETURN 142 
AUFGABEN i 185 !I:PRINT :PRINT TABC23)"WEITER MIT LRUSI 3038 
104 PRINT ” UND BEI AUSGABEN AUF DEM IEC-BUS, 3734 IASIELOFFI”; 
185 PRINT ” UM EIN DURCHEINANDER ZU VERMEIDEN. 3917 186 GET AS: IF A$=""” 6010 186 1572 
186. !C1:!S0:!W8 1136 187 RETURN 142 


Listing 3: DEMO 0 für oberen Bildschirm 
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REN DEMDI ZU MACH2 PRINT#4: CLOSE4: !2 
REM PRINT :PRINT ” LAESST SICH 2.B. EIN 
PRINT :PRINT " LADEN SIE NUNLESPACESIBITIE 3128 PROGRAMM 
DAS PROGRAMM” PRINT ” AUF DEM DRUCKER LISTEN, 
PRINT :PRINT ” DEMO® UND STARTEN SIE ES NIT 4216 PRINT ” OHNE DASS EINE EVENTUELLE AUSGABE 
CRUSIRUNLOFFI” vom 
X:151:!W1 1012 PRINT ” ZWEITEN PROGRANM DAS LISTING 
PRINT "CCLRI” 316 ZERSIOERT. 
GOSUB S8: REM. DEMD-1 TITELBILD 688 GOSUB 148: !C9:!51:PRINT "LELRI”:!W1 
151: !W1 932 PRINT "CDOWNJ MIT USRC®) WIRD EIN WERT VOM 
PRINT ”CCLRI”:1S1:!W1 1233 FIFO 
PRINT "LCLR,2DOWNIJ BEGINNEN WIR MIT 3743 PRINT ” GELESEN. !Z BEWIRKT EIN NULLSETZEN 
STEUERUNG DER PRINT ” DER FIFO-ZEIGER. ”:GOSUB 148 
PRINT ” SYSTEMPARAMETER MITTELS JOYSTICK. 3935 PRINT :PRINT :PRINT :PRINT ” DAS FIFO HAT 
PRINT ” DAZU BENOETIGEN SIE DEN JOYSTICK 3522 EIN EINGEBAUTES HANDSHAKE 
PRINT ” IN PORT 2 1365 WENN ES LEER IST, WARTET USRC®), 
PRINT :PRINT ” WIE SIE SEHEN, TEILT DIE 3740 
SYSTENMZEILE TATSAECHLICH VOM ANDEREN PROGRAMM 
PRINT ” DEN BILDSCHIRM IN 2 HAELFTEN :? 2se5 
PRINT ” OBERELZSPACESIHAELFTE = SCHIRM ® 2742 WERT UEBERTRAGEN WIRD. 
PRINT ” UNTERE HAELFTE = SCHIRM 1 2809 WENN ES VOLL IST, WARTET !PCX), BIS 
!1:G0SUB 148: !CQ 1074 VOM ANDEREN PROGRAMM EIN WERT 
PRINT ”CCLR,2DOWNJ SCHALTEN SIE AUF LRUSISC 3866 
OCOFFI UND PRINT ” WIRD, 
PRINT ” DRUECKEN SIE EINE TASTE. 2403 GOSUB 148: CO 
PRINT " DIE AUFFORDERUNGLESPACESI" CHRS 5056 PRINT ”CCLR,DOWNJ DEMDI SCHREIBT JETZT 
(34)"WEITER MIT LRVSITASTELOFFI” CHRS (34) ZAHLEN AUFS 
PRINT ” IST JETZT WIRKUNGSLOS, DA DIE 2369 PRINT ” FIFO. ENDE MIT EINGABE EINER ® 
PRINT ” TASTATUR JETZT AUF SCHIRM ® WIRKT. 3598 INPUT ” ZAHL”;2:!PCZ): IF 2<>@ GOTO 89 
PRINT :PRINT ” WENN SIE WEITERMACHEN 4411 PRINT :PRINT ” TEXTE MUESSEN UEBER DEM 
WOLLEN, SCHALTEN UMWEG DER CHRS 
PRINT " SIE AUF SCHIRM 1 UND DRUECKEN DANN 3486 PRINT ” FUNKTION UEBERTRAGEN WERDEN. 
PRINT ” EINE TASTE”; 1648 PRINT ” JETZT WERDEN ALSO CHARACTER 
' G0SUB 148: 1C0 1071 UEBERTRAGEN 
PRINT "CCLR,2DOWNJ MIT JOYSTICK 3965 PRINT " ENDE MIT EINGABE VON <RETURN> ": 
RECHTS/LINKS KOENNEN PRINT 
PRINT ” SIE DIE GEWUENSCHTE OPTION 4154 GET A$: IF AS="" GDIO 94 
ANWAEHLEN. PRINT A$;:!PC ASC (AS) 
PRINT :PRINT ” DER [RUSI>LOFFJ - PROMPT 3215 IF ASC (AS)<>13 GDTO 94 
ZEIGT IHNEN DIE PRINT :PRINT "LDOWNJENDE DER DEMO”:END 
PRINT ” GEWAEHLTE FUNKTION AN. 2439 REM DEMO-TEXT 
GOSUB 148: !C9 1971 PRINT CHRS (19): PRINT 
PRINT ”"CCLR,2DOWN] DER RECHNER WIRD JETZT 3185 PRINT "C2SPACESIDDDD" 
AUF BEIDEN FOR I=1 TO 6 
PRINT ” BILDSCHIRMEN BIS 1008 ZAEHLEN. 2828 PRINT "[2SPACESIDE3SPACESID” 
PRINT " GEBEN SIE ABWECHSELND DEM PROGRAMM 3327 NEXT I 
®, PRINT "L2SPACESIDDDD” 
PRINT ” UND DEM PROGRAMM 1 EINE HOEHERE 3689 GOSUB 145:REM TIME 
PRINT ” PRIORITAET UND BEOBACHTEN SIE,”: 4595 151: 1C@:!W1:REM ® WEITER, 1 HALT 
PRINT ” WAS PASSIERT PRINT CHRS, (19): PRINT 
GOSUB 148: !C9: 151 1403 PRINT TABC19)"EEEEE" 
FOR I=1 TO 1808:PRINT I:NEXT I 1427 PRINT TABC1O)”E” 
ıWı 03 PRINT TABC1O9"E” 
PRINT ”"LCLR,2DOWNI LRUSIMACH2LOFFI - 3684 PRINT TABCIO)"EEEE” 
SPEZIALBEFEHLE SIND DURCH FOR I=1 TO 3 
PRINT :PRINT ” EIN VORANGESTELLTES 2636 PRINT IABC1BI"E" 
PRINT :PRINT "L2SPACESJ!L2SPACESI 1978 NEXT I 
GEKENNZEICHNET. PRINT TABC10)”EEEEE” 
PRINT :PRINT ” ZUR VERFUEGUNG STEHEN DIE 3496 GOSUB 145:REM TIME 
BEFEHLE : 151: 1C0:!WI:REM ® WEITER, 1 HALT 


!1:G60SUB 148: !C0 : 1074 PRINT CHR$ (19):PRINT 
PRINT "CCLR,DOWNJ CRUSI!PCXICOFF ,4SPACES] 3928 PRINT TABC17)"MLSSPACESIN” 


ARITHMETISCHEN AUSDRUCK X IN ® PRINT TABC17)"MMLISPACESINM” 
PRINT ” DEN GEMEINSAMEN SPEICHER SCHREIBEN 3654 PRINT TABCAI7I"N m MM» 
PRINT ” CRUSI!ZCOFF,3SPACESIRESET DER 3331 PRINT TABC17)"ML2SPACESIML2SPACESIN” 
POINTER DES GEMEINSAMEN Ebern 
PRINT " SPEICHERS 1356 5 R 
PRINT. = ERUSILESXOLOFF SBACESIFARBE DER 3830 er ehren: 
YSTEMZEILE AENDERN 
PRINT ” X ZWISCHEN ® UND 15 ENTSPRICHT DEN 3373 er N: RAT. 
PRINT ” FARBEN NACH COMMODORE — HANDBUCH 3036 BRINT-EHRSCHSYERRINTER & 
PRINT ” LRUSJUSRCOILOFFI ZAHL VOM 3724 BRINT TABCEJ FUND" 
GEMEINSAMEN SPEICHER FOR Ha To3e 
PRINT ” ABRUFEN UND ZEIGER DEKREMENTIEREN 3239 » - 
REIHE PAIR BLEI > Fee PRINT TAB(C26)"OL3SPACESIO 
!C9: 151:!W1 1200 Der Be 
PRINT "CCLR,2DOWNI MIT !S@OL2SPACESIC!SI) 3496 PRINT TABC27)”000 
WIRD DAS STDPFLAG ® (1) : GOSUB 145:REM TINE 
BEINZ FÜCHSE TE we !51:!C0:!W1:REM @ WEITER, 1 HALT 
PRINT :PRINT ” MIT !COL2SPACESICITI) WIRD 3105 PRINT (EHRSC19):PRINT 
DAS STOPFLAG ® c1) ERINTFIEBESE 
PRINT ” GELOESCHT. 1639 Fe 
PRINT :PRINT ” KOMMT EIN PROGRAMM, EGAL OB - 4836 PRINT TABC342"1 1 
IN BEREICH FOR I=1 TO 4 
PRINT ” ® ODER 1, ZUM BEFEHL !WBOL2SPACESI 2373 PRINT TABC36)”1” 
cıW1), NEXT I 
PRINT ” SO WARTET ES, SOLANGE STOPFLAG ya54 PRINT TABC34)”11111” 
L2SPACESIC1) RETURN 
PRINT " GESETZT IST. 1518 T=TI:REM 1/2 SEC VERZDEGERUNG 
GOSUB 148 2 540 IF TI-T<1S GOIO 146 
!CQ@: PRINT "CELRI": 151: 1W1 1336 RETURN 
PRINT "LCLRI”:G0SUB 98: 151: !W1 1664 II: PRINT : PRINT TABC23)"WEITER MIT LRUSI 
PRINT "CCLRI”: 151: !W1 1233 TASTELOFFJ”; 
PRINT :PRINT ” MIT DER ANWEISUNGSFOLGE 2843 GET AS: IF AS="” GOTIO 143 
PRINT :PRINT "!1:0PEN 4,4:CMD4:LIST: 4207 RETURN 


Listing 4: DEMO 1 für unteren Bildschirm 
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Maschinenspracheß 


MES- Maschinensprache 


Entwicklungssystem 


Maschinensprache gilt vielen als 
Königin der Programmierspra- 
chen. Ihr Tempo ist unschlagbar, 
ihre Flexibilität fast grenzenlos. 
Daher wird sich jeder Computer- 
freund früher oder später der As- 
semblerprogrammierung zuwen- 
den, Damit die ersten Gehversu- 
che „in Maschine" nicht mit einer 
Bauchlandung enden, braucht 
man einige Hilfsmittel. MES (Ma- 
schinensprache-Entwicklungssy- 
stem) bietet die komplette Ausrü- 
stung! 

Die Grundlage bildet der: MES- 
Monitor. Er erlaubt einfache Mani- 
pulationen, wie das Füllen oder 
Verschieben von Speicherberei- 
chen. Speicherinhalte können dis- 
assembliert werden. Mit dem inte- 
grierten Line-by-Line-Assembler 
lassen sich sogar kleinere Pro- 
gramme eingeben. 

Für größere Projekte benötigt 
man schwereres Geschütz: den 
MES-Assembler, der mit editier- 
baren Quelltexten und mit Labels 
arbeitet. Programme lassen sich 


so sicherer und leichter erstellen ' 


und ändern. 

Geht einmal ein Quelltext verlo- 
ren oder ist keiner vorhanden, so 
leistet ein Reassembler gute Dien- 
ste. Der MES-Reassembler er- 
zeugt aus reinem Maschinencode 
einen editierbaren Quelltext, der 
wieder in den Assembler einge- 
speist werden kann, 


l. Der Monitor 


Der MES-Monitor bietet umfang- 
reiche Möglichkeiten zur Anzeige 
und Änderung von Speicherberei- 
chen sowie einen Disassembler 
und einen zeilenorientierten As- 
sembler. Wie die anderen Pro- 
gramme des MES erkennt und 
verarbeitet der Monitor die 
meisten illegalen Opcodes. 

Der Monitor steht im Speicher von 
Adresse $1000 bis $lfff. Er wird 
' mit SYS 4096 gestartet. Folgende 
Befehle stehen zur Verfügung: 


Drei Dinge braucht der 
Maschinensprachler: 
Monitor, Assembler 


und Reassembler. 


Hier gibt’s alles in 


einem Paket. 


— @: der Fehlerkanal der Floppy 
wird gelesen und auf dem Bild- 
schirm ausgegeben. 

— A adresse mnemonic : 

(etwa: a c000 jsr $ffd2) 

Der Mnemonic wird-in die ent- 
sprechenden Hex-Werte umge- 
rechnet und bei der angegebe- 
nen Adresse abgelegt. In der 
nächsten Zeile wird ein ’'A' und 
die logisch nächste Adresse aus- 
gegeben. Man kann so ein 
Maschinenprogramm eingeben, 
ohne die Adresse selbst berech- 
nen zu müssen. Bei Branch-Befeh- 
len ist der Offset anzugeben. 


Bildschirm und Drucker 


— C: Alle folgenden Ausgaben 
erfolgen auf dem Bildschirm (sie- 
he auch P). 

— D startadr endadr: Der Spei- 
cherbereich zwischen startadr 
und endadr wird disassembliert 
ausgegeben. Durch Überschrei- 
ben können die Werte geändert 
werden. 

— F startadr endadr code: Der 
angegebene Speicherbereich 
wird mit der zweistelligen Hexzahl 
code aufgefüllt. 

— G startadr: Ein Maschinenpro- 
gramm wird aufgerufen. 

— H startadr endadr code: Der 
angegebene  Speicherbereich 
wird nach der gesuchten Zahlen- 
folge code durchsucht. Code 
kann bis zu neun zweistellige Hex- 
zahlen oder neun ASCII-Zeichen 
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umfassen. ASCII-Zeichenfolgen 
müssen durch Hochkommas ein- 
geschlossen werden, zum Beispiel 
“text”. 

— L'name",pa: Ein Programm 
wird von einem externen Spei- 
cher geladen. Soll von einem Dis- 
kettenlaufwerk geladen werden, 
kann pa entfallen. Pa hat den Wert 
0l, wenn von Datasette geladen 
werden soll. Nach demL darfkein 
Leerzeichen eingetippt werden. 

— M startadr endadr: Der Spei- 
cherbereich zwischen startadr 
und endadr ‘wird als Hexdump 
und als ASCII-Zeichen aufgelistet. 
Durch Überschreiben können die 
Werte verändert werden, 

— P: Alle folgenden Daten wer- 
den statt auf dem Bildschirm auf 
dem Drucker ausgegeben. Durch 
Eingabe von C wird dieser Modus 
beendet. 

— R: Die aktuelle Registerbele- 
gung wird ausgegeben. Diese um- 
faßt die Register A, X, Y und S so- 
wie das Statusbyte. 

— S$S"name", pa,startadr,end- 
adr+l: Der angegebene Spei- 
cherbereich wird entweder auf 
Disk (pa=08) oder auf Kassette 
(pa=0l) abgespeichert. Nach 
dem S darf kein Leerzeichen ge- 
tippt werden. 

— T startadr endadr neueadr: 
Der Speicherbereich zwischen 
startadr und endadr wird in den 
Bereich mit der neuen Startadres- 
se neueadr verschoben. 

— X: Rücksprung ins Basic. 

Alle Eingaben müssen in hexade- 
zimaler Form erfolgen. Falsche 
Eingaben werden durch ein Fra- 
gezeichen '?' gekennzeichnet. 


2. Der Assembler 


Der Assembler mit integriertem 
Texteditor belegt den Speicher- 
bereich von $2000 bis $3FFF. Zu- _ 
sätzlich zu den’ 8 KByte des As- 

semblers ist noch Platz für den 
Sourcecode und für die Symbol- 


tabelle nötig. Der Assembler ist so $ 
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aufgebaut, daß die Bereiche für 
Source-Code und Symboltabelle 
vom Anwender frei gewählt wer- 
den können. Nach dem ersten 
Start sind sie folgendermaßen 
festgelegt: \ 

Text Speicher $4000 — $7FFF 
Symbol-Speicher $A100 — $BFFF 
Die Symbole (Labels) können den 
RAM-Bereich unter dem Basic- 
ROM nutzen. Ausgenommen da- 
von ist’nur der Bereich von 
$A000--$A0OFF, da hier die geret- 
tete Zero-Page gespeichert wird. 
Dies hat den Vorteil, daß ein im 
Speicher stehendes Basic-Pro- 
gramm, sofern es nicht über- 
schrieben wird, keinen Schaden 
erleidet. Der Text- und Symbol- 
Speicherbereich kahn mit dem 
SET-Befehl verschoben werden. 
Dem Programmierer fallen also 
nur die 8 KByte des Assemblers 
weg. 


Speicher optimal 


ausgenutzt 
EI 


Besondere Eigenschaften: 

— Verträglichkeit mit Basic 

— Symbole beliebiger Länge 

— Hohe Geschwindigkeit (mehr 
als doppelt so schnell wie der 
MAE) 

— Speziell auf die Assemblerpro- 
grammierung abgestimmter Edi- 


tor mit hohem Komfort 
— Vereinfachte Floppy-Bedie- 
nung 


— Optimale Speicherausnutzung 
Wird der Assembler verlassen, 
kann er folgendermaßen neu ge- 
startet werden: 

Kaltstart: SYS 8192 (HEX $2000) 
Warmstart: SYS 8195 (HEX $2003) 
Beim Warmstart wird ein im Spei- 
cher stehender Quelltext automa- 
tisch erkannt, und die Zeiger auf 
ihn werden initialisiert. Somit ist 
die Gefahr‘eines versehentlichen 
Programmverlusts sehr gering. 

1. Editorbefehle: 

Der Texteditor beansprucht etwa 
die Hälfte des gesamten Ässem- 
blers. Mit ihm werden die Textda- 
teien erstellt, die der Assembler 
in Maschinencode übersetzt. Alle 
Eingaben erfolgen wie vom Basic- 
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Editor gewohnt. Die Zeilennum- 
mern dürfen Werte zwischen 0 
und 63999 aufweisen. 

Zur besseren Editierbarkeit wur- 


den beim Listen auf Bildschirm 


oder Drucker folgende Tasten mit 
Sonderfunktionen belegt: 

STOP — Anhalten der Ausgabe. 
Fortsetzung mit beliebiger Taste 
außer DEL. 

DEL — zurück in die Befehlsüber- 
nahme-Bereitschaft. 

Die folgenden Editorbefehle kön- 
nen durch ihre ersten beiden 
Buchstaben abgekürzt werden. 
LIST: Quelltext listen 

Syntax : LI von,bis 

Bei Bedarf kann „von“ und/oder 
„bis“ ersatzlos entfallen. Die Syn- 
tax entspricht also dem Basic, mit 
Ausnahme des Kommas anstatt 
Die Eingabe der Parameter kann 
wie auch bei den übrigen Befeh- 
len des Assemblers in dezimaler, 
hexadezimaler ($), dualer (%) 
oder in symbolischer Form erfol- 
gen. Des weiteren können beliebi- 
ge Werte addiert oder subtrahiert 
werden. 

Beispiel: LI $10—5, 100+%101 
(Auslistung der Zeilen 11—105) 
Als zusätzliche Option steht der 
Befehl PRINT zur Verfügung, der 
den gleichen Zweck erfüllt. 
FORMAT. formatiertes Listen 
Syntax : FO CLEAR : 

oder FO SET 


Formatierung des 


-Quelltextes 


Nach einem Kaltstart ist automa- 
tisch FORMAT set aktiv. Der 
Quelltext wird strukturiert ausge- 
geben. Wird die Formatierung 
ausgeschaltet, erfolgt die Ausga- 
be in der Form, in der der Text 
eingegeben wurde. 
AUTONUMBER: 
Zeilennumerierung 
Syntax: AU Zeilenabstand 

Die nächste Zeile wird bei der 
Programmeingabe automatisch 
vorgegeben. Dieser Modus wird 
durch Eingabe von „//" im An- 
schluß an ‚eine Zeilennummer 
oder durch den Befehl AUTO- 
NUMBER 0 verlassen. 


automatische 


u Sonderheft 2 
WAEHOMEROMPUTERWOERLD. COM 


NUMBER: 
rung 
Syntax: NU start,zeilenabstand 

Der Text wird umnumeriert. Die 
erste Zeile hat den Wert start, die 
weiteren Zeilen haben einen Ab- 
stand von zeilenabstand. 

FIND: Suchen nach einer be- 
stimmten Zeichenfolge 

Syntax: FI /text/ 

Der in zwei Schrägstriche einge- 
schlossene Text wird im Quelltext 
gesucht. Die Zeilen, die diesen 
Text enthalten, werden aufgeli- 
stet. 


Zeilen-Umnumerie- 


Löschen, speichern, 


laden, anhängen 
Be 


DELETE: größere Bereiche  lö- 
schen 

Syntax: DE von, bis 

Die Syntax dieses Befehls ent- 
spricht der des LIST-Befehls. Der 
Versuch, den ganzen Quelltext 
mit diesem Befehl zu löschen, wird 
aus Sicherheitsgründen mit einem 
SYNTAX ERROR auittiert. 
CLEAR: Löschen des gesamten 
Quelltextes 

PUT: Speichern des Textfiles 
Syntax: PU "name" 

Der Quelltext wird unter dem Na- 
men “name,src" gespeichert. Die 
Länge darf maximal zwölf Zeichen 
betragen. 

GET: Laden eines Textfiles 
Syntax: GE "name" APPEND 

Es wird ein Quelltext mit Namen 
"name.src" geladen. Die Länge 
des Namens darf maximal zwölf 
Zeichen betragen. Steht im An- 
schluß an den Namen APPEND, 
wird der im Speicher stehende 
File nicht gelöscht, sondern der 
neue Text an den alten angehängt. 
Passen die Zeilennummern nicht 
zusammen, können sie mit dem 
NUMBER-Befehl berichtigt wer- 
den. 

OLD: gelöschten Quelltext rege- 
nerieren. 5 
Dieser Befehl dient zur Regene- 
rierung eines durch CLEAR oder 
durch einen Kaltstart gelöschten 
Files. Dieser Befehl wird automa- 
tisch bei jedem Warmstart durch- 
geführt. 


2. Weitere Befehle: 

BASIC: Rückkehr zum Basic 

Die Zero-Page wird dabei wieder- 
hergestellt. - 

BREAK: Sprung in den Monitor 
Der Monitor muß jedoch initiali- 
siert sein, damit der Break-Vektor 
auf ihn zeigt. Dies ist in der Regel 
nach dem. erstmaligen Start ge- 
währleistet. Zuvor wird die Zero- 
Page wiederhergestellt. In den 
Assembler gelangt man wieder 
durch Eingabe von: 

X + RETURN 

SYS 8195 

SET. Speicherbelegung bestim- 
men 

Syntax: SE textbeginn, textende, 
labelbeginn, labelende 

Soll nur der Quelltext-Bereich ge- 
ändert werden, genügt die Einga- 
be der ersten beiden Parameter. 
Wird kein Parameter angegeben, 
wird der aktuelle Stand in einer 
Statusmeldung angezeigt. 

Die Statusmeldung, die auch mit 
der Einschaltmeldung ausgege- 
ben wird, zeigt die Bereiche für 
Text und Labels an sowie die 
Adressen, bis zu denen diese Be- 
reiche aktuell belegt sind. 
DIRECTORY: Directory ansehen 
DC: Disk-Kommandos senden 
Syntax! DC befehl 

Mit diesem Befehl können Kom- 
mandos wie an die Floppy ge- 
sandt werden. Fehlt die Angabe 
eines Befehls, wird nur der Disk- 
Status ausgegeben. 

TO: Ausgabegerät setzen 

Syntax: TO IEEE 

oder TO PET 

Nach TO IEEE werden alle Ausga- 
ben auf den Drucker (Geräte- 
adresse 4) weitergeleitet. Nach 
TO PET gelangen die Ausgaben 
wieder auf den Bildschirm. 


Labels zeigen 


RUN: Objektprogramm starten 
Syntax: RU startadresse S 
Ein Objektprogramm wird gestar- 
tet. Endet das Programm mit RTS, 
kehrt man nach Ausführung in den 
Assembler zurück. 

LABEL: Labels zeigen 

Syntax: LA symbol 


' Wird nach dem Befehl noch ein 


Symbolname angegeben, wird 
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dieser in der Tabelle gesucht und 
sein Wert mitgeteilt. Wird der Be- 
fehl ohne Symbolname eingege- 
ben, wird die Symboltabelle kom- 
plett aufgelistet. 

ASSEMBLE: Textfile assemblie- 
ren 

Syntax: AS LIST "name“ APPEND 
Dieser Befehl übersetzt den Quell- 
text in Maschinencode. Die ver- 
schiedenen Parameter können 
bei Bedarf entfallen. Ihre Bedeu- 
tung im einzelnen: 


Dateien assemblieren 


ASSEMBLE LIST: Objekt- und 
Sourcecode werden im zweiten 
Durchgang aufgelistet. 
ASSEMBLE "name“: Die Datei 
"name.src“ wird geladen und an- 
schließend assembliert. Die maxi- 
male Länge des Filenamens be- 
trägt zwölf Zeichen. Steht anschlie- 
ßend noch APPEND, wird ein im 
Speicher stehender Quelltext 
nicht gelöscht. 

3. Der Assembler und seine Hand- 
habung 

Der MES-Assembler ist ein 2-Pass- 
Assembler, das heißt, es sind zwei 
Durchgänge zur Erzeugung des 
Objektcodes erforderlich. Im er- 
sten Durchgang wird die Symbol- 
tabelle (Label-Datei) angelegt und 
eine Syntaxprüfung durchgeführt. 
Im zweiten Pass wird der Objekt- 
code in.den Speicher geschrie- 
ben. - 

Der 6502 (6510)-Prozessor kennt 13 


Adressierungsarten : 

— Implizit ............. TXA 

— Akkumulator ... ASLA 

— Absolut ............ LDA $C000 


— Zero-Page ........ STA $01 

— Unmittelbar ...... LDA #5 \ 
— Absolut\X ......... LDA $CF00,X 
— Absolut,Y.......... LDA $CF00,Y 
— (Indirekt,X) ....... STA ($60,X) 

— (Indirekt),Y ...... STA ($FB),Y 
— Zero-Page,X .... LDA $FB,X 

— Zero-Page,Y .... LDA$FB,Y 

— Relativ BEQ=+10 

— Indirekt ............ JMP ($1000) 
Der Assembler erkennt automa- 
tisch Zero-Page-Adressierung. Ist 
der Operand ein 8-Bit-Ausdruck 
und eine Zero-Page-Adressierung 
nicht gegeben, wird automatisch, 
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sofern möglich absolut adressiert. 
Besonderheiten : 


Unmittelbare Adressierung: 

lda #"a" entspricht Ida #$41 
(Ausnahme: #" “ muß als #$20 
und #";" muß als #$3B geschrie- 
ben werden!) 

Ida #1, adresse = Ida #lowbyte 
lda #h, adresse = Ida #highbyte 
Relative Adressierung : 

beq adresse: der relative Ope- 
rand wird selbständig berechnet 


. beq =+10: Sprung um 10 Bytes 


nach vorn 

beq =-20: Sprung um 20 Bytes 
rückwärts 
Quellprogramm-Syntax: 

Jede Anweisung besteht aus maxi- 
mal fünf Feldern (Spalten): 
Zeilennummer 

Symbol 

Mnemo-Befehl 

Operand 

Kommentar 

— Das Symbol, auch Label ge- 
nannt, ist eine symbolische Kenn- 
zeichnung der Zeile beziehungs- 
weise der Anweisung. Das erste 
Zeichen darf keine Ziffer sein. An- 
sonsten sind ASCII-Zeichen grö- 
ßer als 127 sowie das Anführungs- 
zeichen, das Komma und der 
Strichpunkt ausgeschlossen. Ach- 
tung: Das Symbol muß unmittelbar 
hinter der Zeilennummer stehen! 


Illegale Opcodes 
Be 


— Der Mnemo-Befehl. 

Zulässig sind hier nur die 6502- 
Mnemo-Befehle (einschließlich 
der illegalen) und die Pseudo-Op- 
codes. Sie müssen vom Symbol 
beziehungsweise von der Zeilen- 
nummer um mindestens ein Leer- 
zeichen getrennt sein. 4 

— Der Operand sollte der Über- 
sichtlichkeit wegen um minde- 
stens ein Leerzeichen vom 
Mnemo-Befehl getrennt sein. 

— Der Kommentar wird durch ein 
„‚ eingeleitet. 

Beispiel: 

00020label Ida #1 ; Beispiel 
Zusätzlich zu den „normalen“ 
6502-Befehlen verarbeitet der As- 
sembler auch die illegalen Opco- 
des AAX, DCP, ISC,\LAX, RLA,»> 
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RRA, SLO, SRE (ausführlich be- 
schrieben in RUN 2/1985, Seite 
72—74, und im RUN-Sonderheft 1, 
Seite 12—28). ; 
Zur Vereinfachung der Program- 
mierung gibt es Pseudo-Opcodes. 
Sie werden nicht in Maschinenco- 
des übersetzt, sondern steuern 
die Funktion des Assemblers. Ein 
Pseudo-Opcode besteht aus ei- 
nem Punkt gefolgt von zwei Buch- 
staben. 


16-Bit-Wörter und 
Fließkommazahlen 


‚BA startadresse 

Dieser Befehl legt die Startadres- 
se des Objektprogramms fest. Er 
kann beliebig oft im Quellpro- 
gramm vorkommen, sollte aber 
vor der ersten Zeile stehen, die 
Maschinencode erzeugt. Fehlt 
dieser Befehl, wird automatisch 
$0800 als Startadresse festgelegt. 


BY 


Anlegen einer Tabelle gemäß den 
folgenden Bytes. Jede Größe, ob 
binär, dezimal oder hexadezimal, 
ist von der anderen durch minde- 
stens ein Leerzeichen zu trennen. 
Zeichenketten (Strings) müssen 
zwischen Anführungszeichen ste- 
hen. Beispiel: 

‚BY 13 $20 "BEISPIEL" %10110 

‚SI symbol 

Ein 16-Bit-Wort wird in der Reihen- 
folge Low Byte, High Byte im Spei- 
cher abgelegt. 
«FP fließkommazahl 

Eine Fließkommazahl wird: als Fol- 
ge von fünf Bytes im Speicher ab- 
gelegt. 

„DE adresse 

Dieser Befehl dient zur Definition 
eines externen Labels. Beispiel: 
10bsout .de $ffd2 

„DS länge 

Anlegen eines Puffers. Der Be- 
reich der Länge wird beim As- 
semblieren übersprungen. 

‚OS 

Dieser Befehl legt fest, daß der 
Objektcode in den Speicher ge- 
schrieben- wird. Fehlt dieser Be- 
fehl, wird nur auf Lauffähigkeit ge- 
testet. 
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‚EN 

Die Assemblierung endet an die- 
ser Stelle. Soll das gesamte Quell- 
codeprogramm assembliert wer- 
den, entfällt dieser Befehl. 

Die Fehlermeldungen: 
COMMAND ERROR 


Falscher Befehl im Direktmodus ’ 
.SYNTAX ERROR 


Falsche Syntax eines Befehls oder 
Verletzung der Ässembler-Syntax 
INPUT LINE TOO LONG ERROR 
Eingabezeile ist länger als 79 
Zeichen 


, MISSING FILE NAME ERROR 


Beim Speichern/Laden wurde 
kein Filename angegeben. 
FILENAME TOO LONG ERROR 
Filename länger als zwölf Zeichen 
ILLEGAL LINE-NUMBER ERROR 
Zeilennummer größer als 63999 
LABEL NOT FOUND ERROR 
Label nicht in Symboltabelle ent- 
halten. 

ILLEGAL QUANTITY ERROR 
Bereichsüberschreitungen 
SOURCE-CODE TOO LONG ER- 
ROR 

Quelltext zu lang 

LABEL ALREADY EXISTS ERROR 
Label ein zweites Mal definiert 
LABEL-FILE TOO LONG ERROR 
Symbol-Tabelle zu lang 

ILLEGAL OPCODE ERROR 

Nicht definierter Mnemo-Befehl 
BRANCH TOO LONG ERROR 
Branch größer als +127 bezie- 
hungsweise - 128 

ADDRESS ERROR 

Geforderte Adressierungsart 
nicht vorhanden 

LABEL DEFINITION ERROR 
Unzulässiges Zeichen bei Label- 
Definition 


3. Der Reassembler 
EEE 


Der Reassembler erzeugt aus ei- 
nem Maschinenprogramm einen 
mit dem MES-Editor editierbaren 
Quelltext. Das Programm ist aus 
Zeitgründen vollständig in Ma- 
schinensprache geschrieben. 

Der Reassembler wird nach dem 
Start durch RUN in den Bereich 
von $1000 bis Slfff kopiert. Er wird 
mit SYS 4096 gestartet. Dann sind 
einige Daten des Maschinenpro- 
gramms einzugeben: 
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— Als ersten gibt man die Start- 
und Endadresse des zu reassem- 
blierenden Speicherbereichs ein. 
Die Eingabe wird jeweils durch 
RETURN abgeschlossen. 

— Äls nächstes wird dem Re- 
assembler mitgeteilt, wo die er- 
rechneten Labels zwischenge- 
speichert werden sollen. Dieser 


.Bereich kann auch unter dem Ba- 


sic-ROM oder dem Kernal liegen. 
Der Benutzer hat darauf zu achten, 
daß weder das zu reassemblie- 


.rende Programm noch der Reas- 


sembler selbst in dem angegebe- 
nen Abschnitt liegt. Wird ein zu 
kleiner Bereich angegeben, ver- 
zweigt das Programm automatisch 
zur erneuten Eingabe. 

— Nun kann das Basic-ROM und 
das Kernal ausgeschaltet werden, 
um Programme zu reasseniblie- 
ren, die unter den angegebenen 
Bereichen liegen. 

— In vielen Maschinenprogram- 
men kommen Tabellen vor. Da 
diese Speicherbereiche nicht in 
einen sinnvollen Assemblertext 
umgesetzt werden können, kann 
der Anwender die Lage solcher 
Tabellen per Hand eingeben. Die- 
se Speicherbereiche erscheinen 
im Quelltext in Form eines Hex- 
dumps hinter dem '.‚by'—Befehl. 
— Am Schluß muß noch der File- 
name des zu generierenden 
Quelltextes eingegeben werden. 
Auf der Diskette wird nun ein Pro- 
grammfile erzeugt, das mit dem 
MES-Editor weiterbearbeitet wer- 
den kann. 

Durch den Algorithmus, den der 
Reassembler verwendet, kann es 
gelegentlich vorkommen, daß ein 
Label nicht erfaßt wird. Es muß 
dann per Hand nachgetragen 
werden. 


4. Der Konverter 


Will man einen MAE-Quelltext mit 
dem MES-Assembler bearbeiten, 
so muß man diesen Quelltext erst 
in ein anderes Format bringen. 
Diese Aufgabe erledigt das Hilfs- 
programm MAE-KONVERTER. 
Zwei Eingaben werden benötigt: 

l, der Name des MAE-Quelltextes 
2. der Name, unter dem der MES- 


Quelltext abgespeichert werden 
soll. Die Länge darf maximal zwölf 
Zeichen betragen, da dem Namen 
ein ".src" angehängt wird. 

Die vier Programme werden 
durch das Startprogramm MES- 
Lader (Listing 1) geladen. Der 
Starter fragt, mit welchem Pro- 
gramm beziehungsweise welchen 
Programmen man arbeiten will, 
lädt die gewünschten Files und 
startet sie. 


Vier Hexdumps 
Don nn 


Der Monitor, der Assembler, der 
Reassembler und der Konverter 
sind als kombinierte Hexdump-Ba- 
siclader abgedruckt (Listing 2 bis 
5), Wie man mit dieser Art von 
Listing umgeht, steht auf Seite 6. 


IF A=2 OR A=3 DR A=5 OR A=-1 
PRINT "LCLRJ”:SYS I:END 

IF A=-4 THEN 140 

PRINT ”CCLR, DOWN, 2SPACESI 
MASCHINENSPRACHE-ENTWICKLUNGS- 
SYSTEM” 


PRINT ”"CDOWN, 4OSHIFT *3” 
PRINT "C3DOWN, 2SPACES]I 
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Werden die Programme als Basic- 
lader eingegeben, so muß vor 
dem Eintippen der Start des Basic- 
Speichers mit 

POKE 43,1:POKE 44,32 

POKE 32*256,0 

NEW 

heraufgesetzt werden. Vor dem 
Start müssen die Lader abgespei- 
chert werden. Nach RUN werden 
dann die Daten in den Speicher 
gepoket. Das fertige Maschinen- 
programm kann danach auf Dis- 
kette abgespeichert werden. Für 
den Monitor gibt man dazu ein: 
POKE 43, 0:POKE 44, 16 

POKE 45, 0:POKE 46, 32 

SAVE "MES-MONITOR",8 

Für den Assembler: 

POKE 43, 0:POKE 44, 32 

POKE 45,238:POKE 46, 60 

SAVE “MES-ASSEMBLER"“,8 


Für den Reassembler: 

POKE 43, 0:POKE 44, 16 

POKE 45, 0:POKE 46, 32 

SAVE "MES-REASSEMBLER",8 
Für den Konverter: 
POKE43, 1:POKE44, 8 

POKE 45,188:POKE 46, 11 

SAVE 'KONVERTER" 8 

Nach dem Abspeichern kann man 
die Wirkung der obigen Pokes 
rückgängig machen, indem man 
den Rechner mit SYS 64738 in den. 
Einschaltzustand zurückversetzt. 
Werden die Listings als Hexdump 
eingegeben, so muß der Checker 
benutzt werden. Als Startadressen 
sind anzugeben: 

Für den Monitor 1000 

für den Assembler 2000 

für den Reassembler 1000 

für den Konverter 0801 

(Roland Hank/Jürgen Hank) EakEamue 


PRINT ”L3DOWN, 2SPACESIKENNZIFFER ”; 
GET A$: IF A$S-="” THEN 99 


A=VAL CASI-1 


IF A$=-"1” THEN A=--1:60T0O 120 


PRINT A$ 


IF A=-1 OR A>3 THEN 90 


IF A=-1 THEN I1-4096:LDAD "MES- 


REASSEMBLER”, 


8,1 


1...REASSEMBLER” 

PRINT "C2DOWN, 2SPACESIJ2...MONITOR” 
PRINT ”L2DOWN, 2SPACESI3. , ‚ASSEMBLER” 
PRINT "C2DOWN, 2SPACESIJ4.. .ASSEMBLER 
UND MONITOR” 


isting 1: Start-Programm zu MES 


1000 A9,00,20,D2,FF,A2,1F,BD, 
1008 13,10,20,D2,FF,CA,10,F7, 
1010 4C,B6,19,0D,2n,2A,2n,20, 
1018 52,4F,54,49,4E,4F,4D,22, 
1920 20,2E,53,2E,45,2E,4D,20, 
1028 EA,eA,2A,20,20,20,20,20, 
1938 29,20,20,20,CF,FF,C9,0D, 
1038 F0,3B,C9,20,F0,FS,20,7B, 
1049 10,20,32,0A,0n,0R,0A,85, 
1048 FC,28,CF,FF,20,7B,10,B0, 
1850 24,05, FC,85,FC,29,CF,FF, 
1058 20,7E,10,B®,18,0n,0n,on, 
10880 ° OR,85S,FB,29,CF,FF,20,78B, 
1068 12,B0,0R,05,FB,85,FB,A9, 
1070 00,85,C6,18,60,r2,20,585, 
1078 C6,38,60,C9,39,30,0C,Cs, 
1088 3A,39,0R,C9,41,30,04,C9, 
1088 47,90,07,38,60,38,E3,30, 
1930 18,60,38,E3,37,18,60,29, 
1038 CF,FF,C9S,0D,F@,D7,C9,20, 
10R2 F@,FS,20,7B,10,B®,CE,On, 
10A8 OA,OR,On,B5,02,20,CF,FF, 
1082 29,7B,10,B0,C9,05,22,85, 
1088 02,A3,00,85,C6,18,50,#5, 
12C0 FE,23,F0,4A,4A,4A,4A,An, 


WAW HOMESERPITERWORL BE EOM 


IF A=1 DR A=3 THEN A=A+1:1=4096: POKE 
730,8:POKE 791,16:LOAD ”MES-MONITOR” 
‚8,1 

IF A=2 OR A=4 THEN A=A+1:1I=-8192: LOAD 
»MES-ASSEMBLER”,8,1 


BD,0E,11,20,D2,FF,AS,FE, 
23,0F,AA,BD,0E,11,29,D2, 
FF,AS,FD,29,FQ,4A,4un,an, 
4A,ARA,BD,OE,11,20,D2,FF, 
AS,FD,29,8F,AA,BD,OE,11, 
20,D2,FF,60,AS,FF,29,F®, 
ya,4a,4A,4A,AA,BD,OE,11, 
20,D2,FF,AS,FF,29,0F,An, 
BD,0E,11,4C,D2,FF,30,31, 
32,33,34,35,36,37,38,39, - 
41,42,43,44,45,46,A9,3F, 
292,02,FF,A9,00,20,De,FF, 
AS,5D,20,D2,FF,4C,C3,1E, 
AS,00,29,D2,FF,A3,5D,4C, 
D2,FF,A9,20,4C,D2,FF,20, 
33,10,B8,DA,AS,FB,85,62, 
AS,FC,85,63,28,33,10,30, 
OF,C9,3A,F9,13,A5,62,85, 
64,45,63,85,65,18,30,08, 
AS,FB,BS,64,AS,FC,BS,65, 
20,30,11,R9,3A,20,D2,FF, 
2@,3A,11,R5,62,85,FD,A5, 
63,85, FE,20,BF,19,#9,3n, 
29,D2,FF,A9,00,B1,62,55, 
FF,20,F4,10,20,3A,11,C8, 


Sonderheft 2 &uın 163 


1199 
1198 
11A8 
ı11AB 
11B® 
11BB 
11C08 
11C8B 
11D® 
11D8 
11E® 
11E8 
11F® 
11F8 
1208 
1298 
1218 
1218 
12208 
1228 
1230 
1238 
1249 
1248 
1258 
1258 
1260 
1268 
1270 
1278 
1280 
1288 
1290 
1298 
12A2 
12AB 
1258 
12B8 
12C8 
12C8 
1208 
12DB 
12E® 
12E8 
12F0 
12F8 
1308 
1308 
1319 
1318 
1329 
1328 
1338 
1338 
1340 
1348 
1350 
1358 
1368 
1368 
1378 
1378 
1388 
1388 
1339 
1398 
13AQ 
13A8 
13B® 
13B8 
13C9 
13C8 
13D8 
13D8 
13E®8 
13EB 
13F8 
13FB 
1498 
1408 


sıo 
seo 
538 
s4o 
558 
550 
570 
SBo 
sso 
600 
618 
6208 
639 
649 
659 
65608 
678 
688 
638 
720 
7ı9 
720 
730 
740 
750 
768 
770 
780 
7308 
800 
810 
820 
830 
840 
850 
850 
878 
121217] 
838 
920 
918 
920 
930 
340 
358 
968 
979 
980 
999 
10008 
1018 
19228 
1038 
1040 
1258 
1968 
1970 
1088 
190398 
1190 
1118 
1120 
1138 
1140 
1150 
1160 
1178 
1188 
1198 
1220 
1210 
1220 
1238 
1249 
1258 
1268 
1278 
1288 
1299 
1308 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DAIA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Maschinensprache 


C0,908,D0,F1,A9,30,20,D2, 
FF,A9,12,20,D02,FF,AB,00, 
B1,52,C9,20,99,28,C9,80, 
99,06,C9,R0,B0,02,#3,2E, 
20,02,FF,C8,C0,08,D0,E8, 
A9,932,20,D2,FF,18,45,62, 
693,08,85,562,90,02,E6,63, 
20,ED,F&6,F®,13,AD,8D,02, 
DO,FB,A5,65,C5,63,30,08, 
D®O,BE,AS,64,C5,62,B0,88, 
4C,23,11,C9,0D,F®,F3,4C, 
1E,11,20,CF,FF,C9,0D,F®, 
EF,A9,22,85,03,20,33,10, 
B®O,E3,20,CF,FF,AO,00,20, 
97,10,BO,DF,A5,02,91,FB, 
C8,C0,08,D0,F2,18,A5,FB, 
69,08,85,FD,A5,FC,69,00, 
85,FE,A9,1F,85,D03,A9,12, 
20,D2,FF,A0,00,B1,FB,C9, 
20,30,08,C9,80,30,06,C3, 
AO,BO,02,R9,2E,20,D2,FF, 
C8,C0,28,D0,E8,A9,32,20, 
D2,FF,20,30,11,R9,3A,20, 
D2,FF,20,3R,11,20,BF,1®, 
A93,3A,20,D2,FF,4C,C3,1E, 
4C,1E,11,20,33,10,BO®,F8, 
6C,FB,00,18,65,FB,B5,FB, 
90,02,E6,FC,R2,09,20,3#, 
11,CA,ı10,FA,A9,00,20,D2, 
FF,AS,FC,CS,65,F0,04,BD, 
44,90,38,A5,FB,C5,64,F®, 
32,90,30,80,38,20,33,10, 
BO,CE,AS,FB,48,A5S,FC,48, 
20,33,10,30,07,A9,FF,85, 
65,18,90,08,A5,FB,85,64, 
AS,FC,85,65,68,85,FC,68, 
85,FB,R9,00,85,62,A9,0D, 
Po,D2,FF,AD,80,02,D0,FB, 
20,ED,F6,00,03,4C,28,11, 
E6,63,A5,62,F0,05,45,63, 
F0,01,60,A19,5D,20,Db2,FF, 
A9,2E,20,D2,FF,20,3A,11, 
AS,FB,85,FD,AS,FC,85,FE, 
20,BF,10,20,3A,11,A0,00, 
B1,FB,85,FF,20,F4,10,20, 
3A,11,R0,00,B1,FB,AA,EBD, 
C3,1D,D0,2F,20,13,15,#3, 
21,4C,63,12,A0,00,B1,FB, 
AA,BD,C3,1C,0A,18,7D,C3, 
ıC,AA,BD,00,1C,20,D2,FF, 
E8,BD,090,1C,20,D2,FF,E8, 
ED,00,1C,20,D2,FF,A9,00, 
4C,3A4,11,C9,01,D0,0D,29, 
13,15,A9,41,20,D2,FF,AS9, 
21,4C,63,12,C9,02,D0,1R, 
20,E0,14,A9,24,20,D2,FF, 
C8,B1,FB,85,FD,C8,B1,FB, 
85,;,FE,280,BF,10,A9,03,4C, 
63,12,C9,03,00,15,20,FC, 
14,A9,24,28,D2,FF,C8,El, 
FB,8B5,FF,20,F4,10,49,02, 
4C,63,12,C9,04,D0,1A,20, 
FC,14,A9,23,28,D2,FF,#AS, 
24,20,D2,FF,C8,B1,FB,BS, 
FF,20,F4,10,A9,02,4C,63, 
12,C9,95,D00,24,20,E0,14, 
AS,24,20,D2,FF,C8,Bi,FB, 
85,FD,C8B,B1,FB,85,FE,22, 
BF,10,A9,2C,20,D2,FF,#S, 
58,20,D2,FF,#9,03,4C0,63, 
12,C9,06,D9,24,20,E0,14, 
A9,24,20,D2,FF,C8,Bl,FB, 
85,FD,C8,B1,FB,85,FE,29, 
BF,10,AR9,2C,20,D2,FF,AS, 
59,20,D2,FF,A9,03,4C,63, 
12,C9,07,D0,29,20,FC,14, 
A9,2B,20,D2,FF,A9,24,20, 
D2,FF,C8,B1,FB,85,FF,20, 
F4,19,R9,20C,20,D2,FF,#S, 
58,?0,D?,FF,A9,29,20,D2, 


Sonderheft 2 
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1418 
1418 
1429 
1428 
1430 
1438 
1440 
1448 
1450 
1458 
1460 
1468 
1479 
1478 
1480 
1488 
14399 
1498 
14A® 
ı14AB8 
1458 
14B8 
14C9 
14C8 
14D9 
14D8 
14E® 
14E8 
14F® 
14FB 
1500 
1508 
15190 
1518 
1520 
1528 
1530 
1538 
1549 
154B 
1550 
1558 
1569 
1568 
1578 
1578 
1580 
1588 
1598 
1598 
15AD 
15AB 
1550 
ı5B8 
15C0 
ı15C8 
15D® 
15D8 
15E® 
15E8 
15F® 
15F8 
15699 
15608 
1610 
1618 
1620 
1628 
1630 
1638 
1649 
1548 
16598 
1658 
1650 
15668 
16790 
1678 
1689 
168B 


1310 
1320 
1330 
1340 
1350 
1369 
1378 
1388 
1398 
1409 
1410 
1420 
1439 
1440 
1450 
1468 
1470 
1488 
14390 
1508 
1510 
1528 
1538 
1540 
1550 
1568 
1570 
1580 
1530 
1600 
1610 
1620 
1630 
1640 
16508 
16560 
1670 
1680 
1690 
1700 
1710 
1729 
1738 
1740 
1750 
1760 
1770 
1780 
1790 
18098 
18:2 
1820 
18308 
1840 
1858 
1869 
1878 
1880 
1898 
1909 
1918 
1928 
1932 
1948 
19352 
1968 
19379 
1982 
1939 
2800 
2010 
2020 
2030 
2940 
2958 
[=4#]=10) 
2070 
441210} 
2938 
2108 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


FF,A9,02,4C,63,12,C9,08, 
D92,23,20,FC,14,A3,28,20, 
D2,FF,A9,24,20,D2,FF,C6, 
Bl;FB,85,FF,20,F4,10,#9, 
29,20,D2,FF,R9,2C,20,De, 
FF,AS,59,20,D2,FF,#9,02, 
4C,63,12,C9,09,D00,1F,20, 
FC,14,19,24,20,D2,FF,CB, 
Bl,FB,85,FF,20,F4,10,#8, 
2C,20,D2,FF,A3,58,20,D2, 
FF,A9,02,4C,63,12,C9,0n, 
D®,ıF,20,FC,14,A9,24,20, 
D2,FF,C8,B1,FB,B5,FF,20, 
F4,10,49,2C,28,D2,FF,#AS, 
59,20,D2,FF,A9,02,4C,63, 
12,C9,0B,D0,2F,20,FC,14, 
A9,24,20,D2,FF,C8,18,Bl, 
FB,65,FB,85,FD,AS,FC,63, 
00,85, FE,B1,FB,10,02,C6, 
FE,18,A5,FD,69,02,85,FD, 
90,02,E5,FE,20,BF,10,#8, 
02 ,4C,63,12,20,E0,14,#S, 
28,20,02,FF,A93,24,20,D2, 
FF,C8,Bl,FB,85,FD,C8,El, 
FB,85,FE,20,BF,10,R9,28, 
20,D2,FF,AS,03,4C,63,12, 
C8,B1,FB,85,FF,28,F4,10, 
20,3A,11,C8,B1,FB,BS;FF, 
20,F4,10,29,3A,11,4C,2C, 
13,4C,23,11,C8,Bl,FB,85, 
FF,20,F4,10,20,3A,11,20, 
D2,FF,20,D2,FF,20,D2,FF, 
4C,0C,13,N0,05,20,3#,11, 
88,10,FA,4C,0C,13,49,03, 
85,03,20,CF,FF,A9,03,85, 
D3,20,33,10,B8,CB,A0,00, 
20,97,10,80,18,45,02,31, 
FB,C8,20,37,10,BO,0E,#S, 
02,31,FB,C8,20,97,10,B®, 
04,A5,02,91,FB,n9,01,85, 
62,19,FF,85,63,A9,00,85, 
D3,20,EB,12,A5,FB,85,FD, 
AS,FC,85,FE,A9,090,85,03, 
A9,5D0,20,D2,FF,A9,2E,2D, 
D2,FF,E6,D3,20,BF,10,E6, 
D3,4C,C3,1E,58,20,3F,40, 
00,00,00,00,80,80,15,A0, 
00,8C,7F,15,CE,7F,1S,EE, 
7F,15,B9,08,1C,CD,7C,15, 
F®,0A,C8,C8,C8,C9,C3,D®, 
EE,4C,E3,15,C8,C0,C3,FD, 
F8,B9,080,1C,CD,7D,15,F®, 
08,C8,C8,C0,C3,F0,EA,D®, 
D6,C8,C0,C3,F®,E3,B9,00, 
1C,CD,7E,15,F®,07,C8,C0, 
C3,F®,D6,D08,C2,R0,00,B3, 
C3,1C,CD,7F,15,F0,16,C8, 
D®,F5,AD,80,15,C9,0B,D®, 
02,38,60,68,68,R9,20,20, 
D2,FF,4C,1E,11,B9,C3,1D, 
CD,80,15,D0,E2,8C,7F,15, 
18,60,18,65,FB,85,FB,#S, 
FC,693,00,85,FC,A9,0D,20, 
D2,FF,A9,5D,20,02,FF,AS, 
41,20,D2,FF,A9,20,20,02, 
FF,AS,FB,85,FD,AS,FC,85, 
FE,20,BF,10,49,20,20,D2, 
FF,4C,C3,1E,4C,23,11,#9, 
03,85,03,20,33,10,B2,E2, 
E6,D0,20,CF,FF,C9,0D,FD, 
EB,C9,20,F0,F5,BD,7C,15S, 
20,CF,FF,C9,00,F0,98,80, 
7D,15,20,CF,FF,C9,0D,F®, 
91,80,7E,15,28,CF,FF,C3, 
20,F0,F9,C3,41,D0,14,#9, 
01,20,84,15,AD,7F,15,r0, 
00,31,FB,A9,01,4C,FA,15, 
4C,1E,11,C9,23,09,23,20, 
CF,FF,C9,24,D9,F2,A9,04, 
20,84,15,AD,7F,15,A8,00, 


Pi 


2118 
21208 
2139 
2140 
2150 
2162 
2170 
2188 
2138 
22008 
2218 
22208 
2238 
2240 
2250 
2260 
2270 
2280 
22908 
2300 
2310 
2322 
2330 
2340 
2350 
2360 
23708 
2388 
2398 
24008 
2410 
2420 
2430 
EH4O 
2450 
2460 
2470 


2480, 


2490 
2508 
2512 
8520 
2530 
2540 
2558 
2569 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2688 
2638 
2708 
2718 
2720 
2739 
2740 
2758 
2768 
2770 
2780 
2730 
2802 
2810 
2828 
2530 
28408 
2850 
2869 
2870 
2BB9 
2838 
2988 
2318 


WWW HOMESSMPUTERWORED COM 


91,FB,20,37,10,BO,E1,AD, 
01,415,02,91,FB,A9,02,4C, 
FA,15,C9,24,F0,03,4C,An, 
17,45,D3,80,81,15,AS,FB, 
8D0,82,15,A5,FC,8D0,83,15, 
20,33,10,30,52,E6,0®,AD, 
81,15,85,D3,AD,82,15,85, 
FB,AD,83,15,85,FC,20,537, 
10,B0,ARS,E6,00,20,CF,;FF, 
C9,2C,D0,15,20,CF,FF,Cs, 
58,F0,09,C3,593,D0,31,#3, 
OA,18,90,1F,A9,23,18,30, 
1A,A9,08,20,84,15,B0,11, 
AD,7F,15,R0,00,31,FB,C8, 
AS,02,91,FB,A9,02,4C,FA, 
15,A9,03,20,84,15,AD,7F, 
15,A0,00,31,FB,C8,A5,®2, 
91,FB,A9,02,4C,FA,15,E6, 
DO,AB,FB,A4,FC,AD,B2,15, 
85,FB,AD,83,15,85,FC,8E, 
82,15,8C,83,15,20,CF,FF, 
C9,2C,F0,56,49,0B,20,84, 
15,B8,32,AD,7F,15,A0,00, 
91,FB,C8,38,AD,82,15,ES, 
FB,E9,02,80,82,15,AD,83, 
15,ES,FC,F0,0C,C9,FF,D®, 
05,AD,82,15,30,08,4C,1E, 
11,AD,82,15,30,F8,91,FB, 
A9,02,4C,FA,15,A9,02,20, 
84,15,AD,7F,15,A0,00,31, 
FB,C8,AD,82,15,91,FB,C8, 
AD,83,15,91,FB,A9,03,4C, 
FA,15,20,CF,FF,C9,58,F9, 
0C,C9,59,F0,03,4C,1E,11, 
A9,06,18,930,D2,R9,05,18, 
992,CD,C3,28,F0,11,A9,00, 
20,84,15,AD,7F,15,A0,00, 
91,FB,A9,01,4C,FA,15,20, 
CF,FF,C9,24,D0,07,n5,D3, 
8D0,81,15,A5,FB,80,82,15, 
AS,FC,80,83,15,20,33,10, 
90,53,E6,D®,AD,81,15,85, 
D3,AD,82,15,85,FB,AD,83, 
15,85,FC,20,37,10,B®,AD, 
E6,08,20,CF,FF,C9,2C,D0, 
07,20,CF,FF,C9,58,F0,17, 
C9,29,D0,939,20,CF,FF,CS, 
2C,D0,92,20,CF,FF,C9,59, 
D0,88,19,08,18,30,02,43, 
07,20,84,15,AD,7F,15,AO, 
00,91,FB,C8,AS,02,31,FB, 
A93,02,4C,FA,15,E5,D0,A6, 
FB,A4,FC,AD,82,15,85,FB, 
AD,83,15,85,FC,8E,82,15, 
8C,83,15,20,CF,FF,C9,29, 
F0,03,4C,1E,11,A9,0C,20, 
84,15,AD,7F,15,R0,00,31, 
FB,CB,AD,82,15,31,FB,C8, 
AD,83,15,91,FB,A9,93,4C, 
FA,15,00,00,00,00,00,00, 
00,00,00,00,00,00,02,00, 
00,00,00,00,68,68,4C,1E, 
11,20,B8,18,20,CF,FF,CS, 
2C,D8,F3,20,33,10,BO,EE, 
AS,FB,85,FD,AS,FC,85,FE, 
22,CF,FF,CS,2C,D®,DF,20, 
33,10,B0,DA,A9,0D,28,D2, 
FF,AB,FB,A4,FC,AS,FD,28, 
DB,FF,20,E7,FF,4C,23,11, 
A9,02,85,03,20,CF,FF,Cs, 
22,D0,B9,A2,00,20,CF,FF, 
C3,22,F0,11,9D0,64,18,C9, 
0D,D®,25,E6,D0,18,30,05, 
E8B,E®,12,D0,E8,8A,A2,6n, 
AQ,1B,20,BD,FF,2®,CF,FF, 
C9,2C,00,0B,20,37,10,B0, 
06,A6,02,E0,01,F®,02,r2, 
0B,A9,01,AD,FF,4C,BA,FF, 
20,88,18,49,00,20,05,FF, 
20,E7,FF,4C,23,11,A9,08, 
85,BA,A2,00,86,30,20,B4, 
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239208 
2938 
2340 
29358 
2960 
2970 
2980 
23308 
3998 
3019 
30208 
3038 
3049 
39058 
3069 
3079 
3080 
3050 
3108 
3118 
3128 
3130 
3140 
3150 
3168 
3178 
3188 
3199 
3208 
3210 
3220 
3230 
3249 
3250 
3260 
3279 
3280 
323908 
3390 
3310 
3320 
33328 
3340 
3350 
3360 
3379 
3380 
3390 
34908 
3410 
3420 
3430 
3449 
3450 
3460 
3470 
3489 
3490 
3500 
3519 
3520 
3538 
3549 
3550 
3568 
3579 
3580 
3598 
3692 
3618 
3629 
3632 
3649 
3659 
3668 
3678 
36808 
3630 
3708 
3710 
3729 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


FF,AS,90,D0,1C,A9,00,20, 
CA,F1,R9,6F,85,B9,20,56, 
FF,20,AS,FF,20,CA,F1,C9, 
00,D0,F6,20,AB,FF,4C,23, 
11,4C,1E,11,4C0,37,1B,no, 
02,83,C2,1B,20,CA,F1,C8, 
C0,25,00,F5,20,30,11,20, 
6D,18,38,AD,BB,1B,E9,01, 
85,FD,AD,BC,1B,E9,00,85, 
FE,2@,EF,10,20,60,1B,20, 
5D,1B,A0,00,B9,BD,1B,85, 
FF,20,F4,10,20,6D,1B,CB, 
C0,04,D0,F0,20,6D,1B,2o, 
6D,1B,20,60,1B,AD,C1,1B, 
AA,AD,00,BA,OA,AA,30, 04, 
A9,31,00,02,A9,30,20,Ca, 
F1,20,60,1B,C8,C0,08,D00, 
EA,4C,23,11,00,02,49,30, 
20,CA,F1,20,60,1B,C8,C0, 
08,08,EA,4C,23,11,A9,3C, 
80,16,03,A9,19,80,17,03, 
00,EA,EA,20,33,10,B0,38, 
AS,FB,85,FD,AS,FC,85,FE, 
20,33,10,B0,28,20,97,10, 
BO,26,A0,00,A5,02,31,FD, 
18,A5,FD,69,01,85, FD,30, 
02,E6,FE,AS,FE,CS,FC,30, 
EB,F0,02,B0,08,A5,FD,CS, 
FB,FO,E1,90,DF,4C,23,11, 
4C,1E,11,00,00,00,00,00, 
00,20,00,00,00,20,33,10, 
BO,EE,AS,FB,85,62,nS, FC, 
85,63,20,33,10,BQ,E1,n0, 
00,20,97,10,B0,0A,n5,02, 
99,03, 1A,C8,C0,09,D0,F1, 
C0,00,00,1D,E6,00,C9,0D, 
FO,40,C9,22,00,C2,20,CF, 
FF,C9,0D0,F0,0C,C9,22,Fo®, 
08,39,03,1A,C8,C0,09,D0, 
ED,C0,00,F0,25,8C,B7,1A, 
20,30,11,A0,00,A2,00,B1, 


62,0D,03,1A,F0,25,A2,00, 


A5,63,C5,FC,90,0F,FO,02, 
B0,08,A5,62,C5,FB,F®,0e, 
930,03,4C,23,11,18,A5,62, 
69,01,85,62,30,02,E6,63, 
4C,5F,1A,EB,EC,B7,1A,D®, 
D7,86,64,C6,64,38,45,62, 
ES,64,85,FD,AS,63,E3,00, 
85,FE,20,BF,10,49,20,20, 
CA,F1,AD,8D0,02,D®,FB,eo, 
ED,F6,F0,C6,4C,56,1A,00, 
En,En,EA,EA,20,33,10,B0, 
2A,AS,FB,85,62,AS,FC,8S, 
63,20,33,10,B0,1D,AS,FB, 
85,64,A5S,FC,85,65,20,33, 
18,B0,10,RS,FB,85,66,#5, 
FC,85,67,C5,63,F0,07,BO, 
3F,90,0B,4C,1E,11,AS,66, 

-C5,62,F9,34,B0,32,A0,00, 
B1,62,91,66,18,45,62,63, 
01,85,62,390,02,E6,63,#5, 
63,C5,65,F0,05,30,0B,4C, 
23,11,45,62,C5,64,F0,02, 
BO,FS,18,A5,66,63,01,85, 
66,90,02,E6,567,4C,F8,1n, 
38,n5,64,E5,62,AA,nS,6S, 
ES,63,A8,18,84,65,66,85, 
66,38,65,67,85,67,A0,00, 
B1,64,91,66,38,A5,64,E3, 
01,85,64,B0,02,C6,65,#5, 
65,C5,63,F0,04,B0,08,30, 
B6,R5,64,C05,62,90,80,38, 
AS,556,E3,01,85,66,B0,D8, 
E6,67,4C,40,1B,A9,20,4C, 
CA,F1,R9,04,AA,A0,07,20, 
BA,FF,A9,00,20,BD,FF,2®, 
CO,FF,A2,04,20,C9,FF,4C, 
23,11,A2,00,20,C3,FF,nS, 
04,20,C3,FF,4C,23,11,R2, 
F1,8E,C0,1B,68,8D,BF,18B, 
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68,80,BE,1B,68,8D,BD,1B, 
58,8D0,C1,1B,68,BD,BB,1B, 
68,80,BC,1B,3A,29,30,11, 
4C,3F,19,60,19,52,00,08, 
F1,33,20,20,50,43,20,20, 
20,41,43,20,58,52,20,59, 
52,20,53,50,20,20,20,20, 
4E,20,56,20,23,20,42,20, 
44,20,49,20,5A,20,43,06, 
01,27,30,26,01,27,38,06, 
01,27,30,07,01,38,30,38, 
01,27,3D,2C,01,38,3D,38, 
41,44,43,41,4E,44,41,53, 
4C,42,43,43,42,43,53,4e, 
45,51,42,49,54,42,4D,49, 
42, 4E,45,42,50,4C,42,52, 
4B,42,55,43,42,56,53,43, 
4C,43,43,4C,44,43,40,49, 
43,4C,56,43,4D,50,43,50, 
58,43,50,59,44,45,43,44, 
45,58,44,45,59,45,4F,S2, 
49,4E,43,49,4E,58,49,HE, 
59,4A,4D,50,4A,53,52,4C,, 
44,41,4C,44,58,4C,44,59, 
4C,53,52,4E,4F,50,4F,Se, 
41,50,48,41,50,48,50,50, 
4C,41,50,4C,50,52,4F,4C, 
52,4F,52,52,54,49,52,54, 
53,53,42,43,53,45,43,53, 
45,44,53,45,49,53,54,41, 
53,54,58,53,54,59,54,41, 
58,54,41,59,54,53,58,54, 
58,41,54,58,53,54,59,41, 
3F,3F,3F,41,41,58,44,43, 
50,49,53,43,4C,41,58,52, 
4C,41,52,52,41,53,4C,4F, 
53,52,45,0n,22,38,3F,38, 
22,02,3F ,24,22,02,38,38, 
22,02,3F ,09,22,38,3F,38, 
22,02,3F,0D0,22,38,3F,38, 
22,02,3F,1C,01,38,3D,06, 
01,27,30,26,01,27,38,06, 
01,27,3D,07,01,38,3D,38, 
01,27,3D0,2C,01,38,3D,38, 
01,27,30,29,17,38,40,38, 
17,20,40,23,17,20,38,1B, 
17,20,40,0B,17,40,38,38, 
17,20,40,0F,17,38,40,38, 
7,20,40,2A,00,38,3E,38, 
00,28,3E,25,00,28,38,1B, 
00,28,3E,0C,00,38,3E,38, 
00,38,3E,2E,00,38,3E,38, 
00,38,3E,38,2F,38,39,31, 
2F,30,39,16,38,35,38,31, 
2F,30,39,03,2F,38,38,31, 
2F,30,39,37,2F,36,38,38, 
2F,38,38,1F,1D,1E,3C,1F, 
1D,1E,3C,33,1D0,32,38,1F, 
1D,1E,3C,24,1D,38,3C,1F, 
1D,1E,3C,10,1D,34,3C,1F, 
1D,1E,38,13,11,38,3A,13, 
11,14,38,1A,11,15,38,13, 
11,14,34,08,11,38,3A,38, 
11,14,3A,0E,11,38,3A,38, 
11,14,3A,12,2B,38,3B,12, 
2B,18,3B,19,2B,21,38,12, 
2B,18,3B,05,28,38,38,38, 
2B,18,3B,2D,2B,38,3B,38, 
2B,18,3B,00,07,00,28,00, 
203,03,03,00,04,01,20,00, 
02,02,02,08,28,20,07,00, 
03,09,093,00,06,00,06,20, 
05,05,05,02,07,00,07,03, 
03,03,03,00,04,01,008,02, 
02,02,02,08,08,00,08,00, 
093,09,09,00,06,00,26,00, 
05,05,05,00,07,00,027,00, 
03,03,03,00,04,01,00,02, 
02,02,02,08,08,08,00,00, 
09,09,093,00,06,00,06,080, 
05,05,05,20,07,00,07,00, 


DATA 03,03,03,00,24,01,00,0C, 
DATA 02,02,02,98,08,00,08,00, 
DATA 03,20,09,00,06,00,06,00, 
DATA 05,00,05,00,27,00,07,03, 
DATA 03,23,023,00,00,00,00,.2, 
DATA 02,22,02,0B,08,20,00,09, 
DATA 09,0A,0A,00,06,20,00,20, 
DATA 05,90,00,04,07,04,07,03, 
DATA 23,03,03,00,04,00,00,02, 
DATA 02,02,02,0B,08,00,08,03, 
DATA 29,0A,0A,00,06,00,06,03, 
DATA 05,06,00,04,07,00,97,03, 
DATA 23,03,090,00,04,00,00,02, 
DATA 02,02,02,08,08,00,08,00, 
DATA 09,03,03,00,06,00,06,00, 
DATA 05,05,05,04,027,00,07,03, 
DATA 03,03,03,00,04,00,00,02, 
DATA 02,02,02,0B,08,00,08,00, 
DATA 09,09,09,00,06,00,06,00, 
DATA 05,05,05,20,CF,FF,E6,Dd, 
DATA A2,00,86,03,20,CF,FF,CSs, 
DATA SD,F®,F9,C9,20,F0,F5S,C3, 
DATA 4D,D9,023,4C,3F,11,C9,58, 
DATA D9,03,4C,74,A4,C9,3A,DD, 
DATA 83,4C,EA,11,C9,47,00,06, 
DATA 29,5B,12,4C,23,11,C9,44, 
DATA D0,23,4C,80,12,C8,2E,D®, 
DATA 03,4C,1E,15,C9,41,D0,03, 
DATA 4C,2F,16,C9,53,D0,03,4C, 
DATA 81,18,C9,4C,D9,03,4C,00, 
DATA 19,C9,40,09,03,4C,0E,13, 
DATA C9,52,09,03,4C,5SE,19,C8, 
DATA 46,08,03,4C,C3,19,C3,48, 
DATA D0,03,4C,90D,1A,C9,54,D®, 
DATA 83,4C,BC,1A,C9,50,00,03, 
DATA 4C,72,18,C9,43,D0,03,4C, 
DAIA 8A,1B,C9,7F,B8,04,C9,21, 
DATA B0,03,4C,23,11,A9,20,20, 
DATA D2,FF,4C,1E,11,20,0B,03, 
DATA AD,01,06,85,27,4C,1D,04, 
DATA AD,01,06,20,48,03,88,CC, 
DATA 01,06,B9,0A,C8,BS,00,06, 
DATA 20,48,03,4C,5C,04,A9,00, 
DATA 80,00,18,49,01,85,1C,+4C, 
DATA 94,C1,n2,00,86,0F,86,0C, 
DATA A6,1C,F0,09,A9,00,85,1C, 
DATA A9,E9,20,BD,04,A9,E0,20, 
DATA BD,04,C9,02,00,29,#5,0C, 


‚DATA DO,25,E6,0C,AR9,C0,20,BD, 


DATA 04,49,B0,20,BD,24,C9,01, 
DAIA D9,15,4C,8A,04,C9,03,D0, 
DATA OE,AS,OF,D9®,0R,ES,0F,#AS, 
DATA CO,20,BD,04,4C,8A,04,60, 
DATA 8D,5SB,02,80,4D,02,85,00, 
DATA A9,FF,80,38,02,R2,00,58, 
DATA 20,A6,05,B0,FB,60,02,4D, 
DATA 2A,53,2R,04,F7,C9,80,00, 
DATA 03,4C,07,F7,4C,A9,FS,EA, 
DATA 88,FF,FF,FF,FF,FF,FF,FF, 


FOR A-4035 TO 8184 STEP 8: 
S-9:C=0:FOR B-® TO 7:605SUB 
60949 
S=S+H+L-C:0=S>255:5=255-5 
AND 255:PODKE A+B,H+L:NEXT 
B:G0SUB 50040 
FS="PRUEFSUNME OK”:IF Sc> 
H+L THEN FS="ERUSI 
PRUEFSUMMENFEHLER”:F=F+1 
GOSUB 60039:NEXT A:PRINT " 
EDOWNI"F"FEHLER”:END 

READ HS:60SUB 60950:H=L* 
16:H$5=-N1D5 CHS,2) 

L=ASC CHS+"X”)-48: IF L<DO 
OR L>22 THEN 60089 

IF L<19 THEN RETURN 
L=L-7:IF.L>S THEN RETURN 
FS="LCRUSIEINGABEFEHLER”:L= 
O:F=F+1 

PRINT "ZEILE" PEEK (64)* 
2SG+PEEK (63)F$: RETURN 


Listing 2::Kombinierter Hexdump-Basiclader des MES-Monitors 
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2000 
2008 
2019 
2018 
2020 


2028 


2030 
2038 
2040 
2048 
2050 
2058 
2060 
2068 
2070 
2078 
2080 
2088 
2030 
2038 
ERRT) 
20RB 
20B0 
2058 
22C0 
20C8 
2000 
2008 
2DEDO 
2DEB 
20FO 
2OFB 
2100 
2108 
2110 
2118 
2120 
2128 
2130 
2138 
2140 
2148 
2150 
2158 
2160 
. 2168 
2170 
2178 
2180 
2188 
2190 
2198 
21AB 
21a8 
21B0 
21B8 
21C0 
21ICB 
2ın® 
2108 
21EO 
21E8 
21FO 
ZIFB 
2200 
2208 
2210 
2218 
2220 
2228 
2230 
2238 
2240 
2248 
2250 
2258 
2260 
2258 
2278 
2278 
2280 
2288 
2230 
2238 
z2R0 
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4C,96,24,4C,DD,24,20,57, 
F1,A0,00,E6,D00,84,03,22, 
57,F1,C9,28,F®,F9,C9,5D, 
FO,FS,D0,03,20,57,F1,C8, 
0D,F®,0F,39,00,02,C8,C0, 
4F,S0,F1,A2,17,A0,03,4C, 
0B,2D,R9,00,33,00,02,385, 
01,02,AD,00,02,C3,3A,B®, 
04,C93,30,B0,03,4C,62,21, 
A2,01,50,00,02,C3,30,50, 
27,C9,34,B0,23,E8,E®,05, 
D9,F0,AD,05,22,C3,30,30, 
04,C9,3A,30,0E,AD,00,®2, 
C9,36,30,0C,AD,01,02,C3, 
34,90, 05,A0d,06,4C,0B,2D, 
AD,05,3F,C9,02,09,03,CE, 
05,3F,A2,FF,EB,BD,00,02, 
29,F0,C93,30,F®,F6,BD,0®, 
02,C9,20,D9,05,A3,80,5D, 
00,02,C9,2F,D®,0F,BD,®1, 
02,C9,2F,D0,08,49,00,8D, 
05,3F,4C,55,21,R9,00,85, 
7A,A9,02,85,7B,AD,20,02, 
18,20,6B,A9,98,38,E5, 7A, 
69, 04,85,0B,AD,00,AB, 7A, 
BD,00,02,39,00,02,F0,04, 
E8,CB,D0,F4,AQ,92,n5,14, 
91,03,C8,A5,15,91,03,18, 
AS,03,65,0B,85,03,90,02, 
E6,04,A5,04,CD,21,3F,S0, 
0E,D®,07,45,03,CD,20,3F, 
90,05,A2,09,4C,0B,20,A9, 
2C,80,02,03,A9,21,80,03, 
03,4C,A4,A4,A5,2B,8D,0D, 
3F,AS,2C,/80,0E,3F,38,#5, 
2D,80,0F,3F,E3,02,85,03, 
AS,2E,8D,10,3F,B®,02,C6, 
04,49,83,80,02,03,A9,R4, 
80,03,03,49,20,85,39, AD, 
05;3F,F0,19,C9,02,00,03, 
4C,55,21,18,A5,14,6D, 07, 
3F,AA,AS,15,60,08,3F,20, 
81,22,4C,06,20,A9,00,20, 
D2,FF,A9,5D,20,D2,FF,4C, 
06,20,A2,00,AD,00,02,03, 
A7,2E,D0,17,AD,01,02,D8, 
AB,@E,DO,OF,20,7A,21,4C, 
29,21,B9,AA,2E,48,B9,A9, 
2E,48,60,C8,C8,C8,C8,53, 
A7,2E,D0,D8,AD,00,02,F®, 
98,n0,01,4C,0B,2D,20,6D, 
2E,65,2E,73,20,20,20,651, 
20,73,20,73,20,65,20,6D, 
20,62,20,6C,20,65,20,72, 
0D,20,50,52,4F,47,52,41, 
4D,4D,45,44,20,42,59,20, 
72,4F,4C,41,4E,44,20,68, 
41,4E,4B,00,84,7A,A9,02, 
85,7B,B9,80,02,F0,03,CSs, 
20,F0,05,E6,7A,C8,0®,F2, 
C6,7A,A5,7A,80,06,3F,60, 
A®,02,20,CC,21,20,73,00, 
F0,0D,C9,2C,F®,09,43,02, 
85,7B,20,73,00,00,03,38, 
B0,01,18,20,4F,29,A5,14, 
80,00,3F,A5,15,8D,01,3F, 
05,14,F0,07,28,73,00,C5, 
2C,D0,0C,20,73,00,D0,03, 
38,F@,01,18,29,4F,29,#5, 
14,05,15,D9,04,C6,14,C6, 
15,AS,14,8D,02,3F,AS.,15S, 
80,03,3F ,AD,0D,3F,85,SF, 
AD,GE,3F,85,60,20,4A,23, 
AS,0D,20,D2,FF,50,20,E8, 
21,A0,00,B1,5F,85,FE,CB, 
11,5F,00,03,4C,44,23,B1, 
SF,85,FF,C8,Bi1,5F,AA,C8, 
81,5F,CD,03,3F,30,05,D®, 
03,EC,02,3F,F®,05,30,03, 
4C,44,23,20,81,22,4C,BD, 
©22,85,62,86,63,A2,30,38, 
20,49, BC,20,DD,BD,AS,0D, 
20,D2,FF,R3,20,20,De,FF, 
AD,00,A2,06,C8,CA,B3,00, 
01,D0,F3,E0,08,F0,0A,as, 


22AB 
e2B8 


22B8 


22CD 
e2C8 
2208 
2208 
2ZE® 
22EB 
11) 
D2F8 
2308 
2388 
2318 
2318 
23208 
2328 
2338 
2338 
2340 
2348 
2358 
2358 
2368 
2368 
2378 
2378 
2388 
2388 
2399 
2398 
2e3Ad 
23A8 
2388 
23B8 
23C0 
23C8 
23D® 
23D8 
23E® 
23E8 
e3F® 
e3FB 
2400 
2408 
E41 
2418 
2420 
2428 
2430 
2438 
2440 
2448 
E45® 
2458 
246D 
2468 
2470 
2478 
2480 
2488 
2438 
249B 
e4AB 
E4AB 
e4B2 
24BB 
24CO 
24CB 
24D8 
24D8 
24EO 
e4EB 
E4FO 
24FB 
25088 
2508 
2519 
2518 
2529 
2528 
2538 
2538 
25498 
2548 


30,20,D2,FF,CA,DO,F8,Ro, 
00,E8,BD,00,01,F0,05,20, 
D2,FF,DO,FS,60,A0,03,#8, 
05,85,14,A9,00,85,15,C8B, 
B1,5F,F@,59,C3,3B,D0,1D, 
C@,04,F@,19,AE,04,3F,F®, 
14,A6,14,E0,28,98,02,r2, 
1D,A9,20,20,D2,FF,E8,EO, 
28,30,F6,A9,3B,C9,80,D0, 
19,AD,04,3F,F®,0A,C0,04, 
D2,06,20,3B,23,4C,C7,22, 
A3,20,20,02,FF,E6,14,4C, 
C7,22,C0,04,D0,02,E6,15, 
AB,15,F@,EE,C9,20,D0,EnA, 
C6,15,AE,04,3F,FO,E3,c0, 
9B,23,4C,C7,22,AS,FE,85, 
SF,AS,FF,85,60,A5,CB,FO, 
13,C9,3F,D0,0C,AS,CB,Fo, 
08,C9,40,F0,F8,C3,3F,F®, 
F4,4C,51,22,A49,00,20,De, 
FF,60,A0,00,81,5F,CB,11, 
SF,F0,23,A0,03,B1,SF,CD, 
01,3F,90,08,00,06,88,B1, 
SF,CD,00,3F,B0,10,A0,00, 
B1,5F,48,C8,B1,5F,85,60, 
68,85,5F,4C,4A,23,60,AB, 
02,20,CC,21,20,73,00,C3, 
43,F0,09,C9,53,F®,0E,AD, 
02,4C,08,20,A9,20,8D,04, 
3F,60,20,CC,21,A9,0A,0D, 
04,3F,60,A6,14,E0,10,90, 
02,A2,0F,A9,20,20,D2,FF, 
E6,14,E8,E0,10,D0,F4,CB, 
B1,SF,C9,20,F0,F9,88,60, 
18,AD,1E,3F,85,14,69,01, 
85,03,80,00,3F,85,2B,AD, 
1F,3F,85,15,69,00,85, 04, 
80,0E,3F,85,2C,18,AD,1E, 
3F,69,03,80,0F,3F,85,2D, 
AD,1F,3F,69,00,8D,10,3F, 
85,2E,20,3E,25,31,14,C8, 
91,14,C8,91,14,60,A9,0e, 
80,05,3F,A0,02,20,CC,21, 
20,73,00,D@,0n,A9,00,8D, 
05,3F,A0,02,4C,0B,2D,18, 
20,4F,29,A5,14,80,07,3F, 
05,15,F0,06,A5,15,8D,08, 
3F,60,80,05,3F,60,n0,00, 
22,CC,21,20,73,00,18,20, 
4F,29,A5,14,80,09,3F #5, 
15,8D0,0A,3F,20,73,00,C3, 
2C,F0,05,A0,02,4C,0B,2D, 
20,73,00,8D,0C,3F,20,4F, 
29,A5,14,80,0B,3F,AS,15, 
8D,0C,3F,AD,0D,3F,85,5F, 
AD,8E,3F,85,60,40,00,B1, 
SF,48,C8,11,5F,F0,25,C8, 
18,AD,09,3F,91,5F,6D,08, 
3F,8D,09,3F,AD,oA,3F ‚CB, 
91,5F,6D,0C,3F,8D,0R,3r, 
AQ,01,B1,5F,85,60,68,85, 
SF,4C,65,24,68,60,20,EC, 
24,A0,00,8C,34,3F,BC,1E, 
3F,8C,1A,3F,8C,22,3F,84, 
FB,8C,26,3F,88,8C,20,3F, 
8C,1C,3F,A9,40,8D,1F,3F, 
A9,7F,80,21,3F,A9,A1,8D, 
1B,3F,80,23,3F,85,FC,n®, 
00,38,31,FB,A3,BF,8D,1D, 
3F,20,B8,23,28,48,25,20, 
4D,2C,4C,73,25,20,EC,e4, 
29,B8,23,29,48,25,20,ER, 
2B,4C,73,25,A0,00,8C,2C, 
3F,B9,00,00,39,00,A0,c8, 
D8,F7,78,49,C1,8D,18,03, 
AS,FE,8D,19,83,A9,31,8D, 
14,203,#9,EA,8D,15,03,58, 
60,78,49,36,85,01,A0,0e, 
B3,00,40,39,00,00,C8,D®, 
F7,A9,37,85,01,58,50,20, 
11,25,20,44,ES,4C,74,A4, 
20,11,25,20,44,E5,00,20, 
11,25,78,4C,47,FE,A9,FF, 
85,37,85,38,49,00,R8,60, 
A3,00,8D0,05,3F,AD,04,3F, 
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DATA F0,05,A9,0A,8D,04,3F,n3, A7 2800 2570 DATA 20,36, FF,R9,00,85,30,A0, 4C 
2558 1722 DATA 00,20,D2,FF,A9,0E,20,02, A3 2808 2589 DATA 03,84, FB,20,A5,FF,85,FC, 89 
©5609 173@ DATA FF,A®,80,B9,36,21,20,D2, 69 2818 2590 DATA A4,90,08,49,20,A5,FF,A4, 70 
e568 1740 DATA FF,C8,C0,36,00,F5,A9,0D, 37 2818 2690 DATA 30,09,42,A4,FB,88,D008,ES, BB 
2570 1758 DATA 4C,D2,FF,A9,5D,20,D2,FF, E® 2820 2610 DATA AB,FC,28,CD,BD,A3,28,20, ı2 
2578 1768 DATA 4C,06,20,R0,FF,C8,B3,00, B5 2828 2620 DATA D2,FF,20,AS,FF,R6,30,00, 67 \ı 
25882 1778 DATA 02,08,FA,B8,B39,00,02,C3, 36 2830 2630 DATA 2C,AA,FO,06,20,02,FF,4C, 6D 
2588 1788 DATA 2F,F0,05,A9,02,4C,0B,2D, 3A 2838 2640 DATA 2A,28,A3,0D0,20,D02,FF,Ao, 4B 
2538 1798 DATA AQ,02,20,CC,21,20,73,00, 66 28408 2650 DATA 02,A5,C5,C9,3F,F0,06,C9, E7 
25938 1898 DATA C3,2F,F0,05,A9,02,4C,0B, 62 2848 26698 DATA 00,F0,12,00,BC,R5,C5,C9, 66 
eSAB 1812 DATA 20,20,73,00,C9,2F,00,05, E4 2850 2670 DATA 3F,F®,FA,C9,00,F0,06,C9, CF 
eSAB 1829 DATA AB,02,4C,08,2D,C6,7A,A2, 1E 2858 2688 DATA 40,F®,F2,DB,AC,20,42,F6, 4a 
©25B® 1838 DATA FF,E8,20,73,00,30,00,02, 26 ‚ 2860 2690 DATA 29,66,28,4C,E7,FF,A9,0D, 1A 
eSBB 1848 DATA C9,2F,D0,FS,49,00,30,00, BA BB68 2700 DATA 20,D02,FF,20,D2,FF,A9,08, Al 
eSCO 1858 DATA 22,AD,00,3F,85,5F,AD,@E, ES 2878 27108 DATA 85,BA,A2,00,86,30,20,B4, CF 
@25C8 1868 DATA 3F,85,60,A0,03,A2,FF,C8, 13 2878 2720 DATA FF,AS,30,F0,01,60,A9,6F, D5 
2502 1878 DATA EB,BD,00,02,F@,0F,D1,5SF, 7B 2880 2730 DATA 85,B9,20,36,FF,20,A5,FF, DB 
2SD8 1880 DATA FO,FS,C8,B1,5F,F0,3D,88, 37 2888 2740 DATA 20,D2,FF,C9,00,08,F6,4C, 6C 
eSE®O 1838 DATA A2,FF,4C,CF,25,45,C5,C9, SD 2898 2750 DATA AB,FF,AB,02,20,CC,21,20, AO 
2SEB 1908 DATA 3F,F0,05,C9, oo, D®,0F,60, 6D 2838 2760 DAIA 73,00,F0,CA,A9,01,A2,08, Da 
eSF@ 1918 DATA AS,C5,C9,3F,F®,FA,C9,00, 28 2BAB 2770 DATA AB,6F,20,BA,FF,A9,00,85, 69 
eSF8 1928 DATA FO,FS,C9, 49, FO,F2,A0,02, ıF ZBAB 2780 DATA 39,20,BD,FF,20,C0,FF,As, E4 
2608 13938 DATA Bl,5F,AA,C8,B1,5F,20,81, 25 BEBßO 2790. DATA 08,20,B1,FF,A9,6F,208,53, 62 
2608 1340 DATA 22,40,03,C8,B1,5F,F®,0C, F3 28BB 2800 DATA FF,AB,00,B1,7A,F0,07,20, 20 
2618 1958 DATA C3,80,08,02,A3.20.20.n2' ED 28Ca@ 2810 DATA AB,FF,C8,4C,8B,28,49,08, 58 
2618 1368 DATA FF,4C,0B,26,A0,00,B1,5F, 89 28C8 2820 DATA 20,RAE,FF,20,66,28,49,01, 36 
e620 1978 DATA AA,CB,11,5F,F0,09,B1,5F, CC 2808 2838 DATA 4C,C3,FF,AD,1E,3F,85,FB, 44 
2628. 1988 DATA 85,60,86,5F,4C,CB,25,60, 33 2808 2840 DATA AD,1F,3F,85,FC,AB,00,B1, F3 
2630 1938 DATA 20,E8,21,AD,02,3F,2D,®3, 3B 2BEO 2850 DATA FB,F0,08,C8,00,F3,E6,FC, 9OC 
2638 2208 DATA 3F,C9,FF,D®,1E,AD,00,3F, D8 2BEB 2860 DATA 4C,DF,28,20,BF,26,B1,FB, C4 
2640 ©2018 DATA 2D,01,3F,D0,05,Ad,02,4C, 38 eBF®O 2870 DATA DO,ED,20,BF,26,B1,FB,D®, ES 
e648 2020 DATA 0B,20,R9,00,AB,91,5F, EB, 35° EBFB 2880 DATA E6,C8,00,02,E6,FC,18,38, 56 
2658 2038 DATA S1,5F,C8,91,5F,20,33,A5, 36 2308 2830 DATA 65,FB,80,0F,3F,85,2D,45, 2B 
2658 22408 DATA 4C,D3,28,AS,5F,85,FB,AS, 2D 2308 ‚29308 DATA FC,69,20,80,10,3F,85,2E, 2E 
2668 2050 DATA 60,85, FC,R®,03,B1.FB.CD. B7 2818 2910 DATA 85,04,38,AD,OF,3F,E3,02, C3 
2668 2069 DATA 03,3F,30,08,00,06,88,B1, EC 2318 2929 DATA 85,03,80,02,C6,04,60,C9,: 87 
2670 2878 DATA FB,CD,02,3F,B0,14,R0,00, 2C 2320 2938 DATA 30,990,04,C9,3A,90,01,38, 58 
2678 2088 DATA B1,FB,48,C8,B1,FB,85,FC, 76 2328 2340 DATA 60,C9,41,90,04,C9,47,30, 3C 
2688 2088 DATA 68,85,FB,05,FC,F9,C3,4C, 5B 2330 2950 DATA 01,38,69,C9,20,F0,14,C9, BD 
2688 2108 DATA 63,256,00,0D, AB, 00,B1,FB, 54 2338 2360 DATA 20,00,02,#3,2C,C9,2C,F0, 4A 
2630 2110 DATA 48, CB, Bl1,FB,85,FC,68,85, A3 2348 2978 DATA 8A,C9,29,F0,06,C9,2B,F®, FS 
28638 2128 DATA FB,AB,00,B1,FB,91,5F,D8, A3 eS4B 2380 DATA 02,C9,20,60,20,73,00,30, 25 
26AB 2138 DATA 3C,20,BF, 26, Bl, FB, 08,32, 88 235 2330 DATA 07,A9,00,85,14,85,15,60, IF 
e6RB 2140 DATA 20,BF,26,B1,FB,D8,28,#3, 81 e35B 3000 DATA A2,00,BE,23,3F,20,73,00, SE 
e6B0 2158 DATA 00,91,5F,C8,91,5F,C8,31, 6F 23690 3010 DATA 29,1F,29,B8,57,A4,7A,A2, 06 
BEBB 2168 DATA SF, 20. 33, AS, 4C, D3,28,18, 57 eS68 3920 DATA 09,89,00,02,20,1F,23,90, E® 
26C® 2170 DATA AS,FB,69, 01,85,FB,90,02, 2A 2372 3038 DATA 00,20,33,29,39,80,02,F0, A2 
26CB 2180 Dala EB. ‚FC,60,38,AS,FB,E9,01, A4 29378 38408 DATA 09,A0,92,4C,0B,20,C8,E8, DE 
2602 2198 DATA 85,FB,B8,02,C6,FC,60,20, 42 2382 3050 DATA D8,E7,EO,06,90,05,ARB,08, ES 
e6D8 2208 DATA CB,26,20,CB,26,C8,D08,BB, 6D 2388 3060 DATA 4C,0B,20,84,FE,A4,7A,E®, DE 
@6EBO 2210 DATA E6,FC,E6,60,40,9B,26,AB, A7 2338 3878 DATA 05,00,14,86,FF,A2,00,B9, 68 
e6EB 2220 DATA 22,20,CC,21,20, 73, 00, cs, 7ı 2338 3080 DATA 00,02,00,87,29,30,028,00, F6 
26FB 2238 DATA 43, D8,19,A9, on, 20, D2, FF, AA eSAQ 3030 DATA ES,C8,E8,E4,FF,DO,F®,20, 1F 
e6F8 224® DATA A9,0A,A2,04,A0,07,20,Bn, 3B eSAB 3198 DATA 79,00,20,8A,AD,20,F7,B7, DB 
2708 2250 DATA FF,A9,01,20,C0, FF, re, ‚on, 30 ESBßO 3112 DATA AS,FE,85,7A,4C,BF,2C,36, 36 
2708 2268 DATA 20,C9,FF, 68, cg, so, FO, 83, 5B 23B8 3128 DATA 35,35,33,35,C9,24,F0,03, 8F 
2718 2270 DATA 4C,45,26,20, EC, FF, A2,0A, 72 eS3C0 3138 DATA 4C,41,2A,20,73,00,A4,7A, Bl 
2718 2280 DAIA 20,C3,FF,60,A0,02,20, EC, EE eScB 3140 DATA A2,00,B9,00,02,20,1F,23, 32 
2720 22890 DATA 21,20,73,00,F0,34,C9, 22, D6 eSD® 3158 DATA 99,00,02,90,0F,20,29,29, Fa 
2728 2308 DATA FD, 03, 4C,45,26,A2,00,C8, BO 2SD8 3169 DATA S9,0A,20,33,29,F0,09,A8, 16 
2738 2318 DATA C8,B3,00,02,FO.F4.cs.2e. Bo eSEO 31708 DATA 02,4C,0B,2D,C8,E8,D8,E2, 62 
2738 2328 DATA FO,06,90,E0,02,E8,08,F®, Al eSEBß 31898 DATA EO, 05,98,05,A8,08,4C,0B, 3D 
2740 2338 DATA 84,7A,8A,F0,15,C9,00,B8, 4F 23F® 3198 DATA 2D, EO,00,FO,EA,84,FE,86, 3C 
2748 2349 DATA 14,A0,23,89,56,27,90,E®, AB 2SF8 3208 DATA ER) ED, 04,F0,0n,Es.ns. 00, FF 
2758 2350 DATA 02,EB,88,10,F6,68,43,52, ı9 2ABa 3210 DATA SD,14,3F,E0,84,D0,F6,AB, 6C 
8758 2368 DATA 53,2E,A9,04,2C,R8,05,4C, 06 2ABB 3220 DATA FF,A4, 7a, B9,008,02,20,1F, ıB 
2760 237@ DATA 0B,2D,20,1C0,27,BA,R2,Eo, 41 eR1IO 3238 DATA 29, B0,05,23.0F.4C.1B,en. oA 
2768 2382 DATA AQ,02,20,BD,FF,AS,08,An, B5 eA1B 3242 DATA 38,E9,37,90,14,3F,C8,CA, BD 
2778 2398 DATA AQ,FF,20,BA,FF,AE,0D,3F, 27 BA2d 3258 DATA DO,ES, AD, 16,3F,OR,on. on, B3 
2778 24988 DATA B6,FE,AC,OE,3F,B4,FF,AE, 32 BA2B 3260 DATA DA,OonD, 15,3F,85,14,AD,18, D9 
2788 2418 DATA OF,3F,AC,10,3F,A9,FE,2®, DF 2A30 3270 DATA 3F,0R,On,DoA,on.on. 17,3F, oA 
2788 24208 DATA DB,FF,20,66,28,4C,E7,FF, 57 EA38 3288 DATA 85,15,AS,FE,85,7A.4C.BF. AF 
2738 2430 DATA 28,10,27,BA,n2,E0,AB,02, o1 EAHO 3290 DATA 2C,C9,25,00,57,20,73,00, 63 
2738 2449 DATA 20,BD,FF,A9,08,AA,ABd,00, BB eA4B 3300 DATA A4,7A,A2,00,B9,00,02,C9, BD 
2E7AB 2458 DATA 20,BA,FF,AE,0D,3F,AC,dE, 23 eAS® 3310 DATA 39,F0,0E,C9,31,F0,0n,20, B3 
2E7AB 2460 DATA 3F,20,73,08,F0,16,C3,41, Fe eASB 3322 DATA 33,29,F0,09,A0,02,4C,0B, CF 
©27B0 2470 DATA F0,05,R0,02,4C,0B,20,38, BE ERGO 3338 DATA 20,C8,E8,00,E7,E0,09,30, FE 
©27B8 2480 DATA AD,OF,3F,E9,02,RAA,AC,10, ES eAGB 3342 DATA 03,4C,86,29,E0,02,00,03, C® 
27CO 2492 DATA 3F,B0,91,88,A9,20,28,05, FD 2EA7B 3350 DATA 4C,DF,29,84,FE,A4,7A,86, 61 
27C8 2508 DATA FF,20,EA,2B,20,33,A5,20, BE eA78 3360 DATA FF,A9,00,80,19,3F,AA,B9, 34 
2708 2518 DATA 66,28,4C,E7,FF,A9,0D,20, E6 EABDO 3378 DATA 20,02,4A,2E,19,3F,C8,E8, D4 
2708 2528 DATA D2,FF,20,D2,FF,A9,24,85, 17 EABB 3389 DATA E4,FF,D®,F3,AD,19,3F,85, 10 
27EO 2538 DATA FB,AS,FB,85,BB,A2,00,86, 5B EASO 3398 DATA 14,A9,00,85,15,A5,FE,85, DO 
@7EB 2548 DATA BC,86,30,E8,86,B7,A9,08, 4E 2SASSB 3492 DATA 7A,4C,BF,2C,20,33,23,00, 07 
E7FO 2550 DATA B5,BA,A9,60,85,89,20,05, 2B ZAAB 3410 DATA 01,69,A4,7A,8C,30,3F,A2, C4 
27F8 2568 .DATA F3,A5,BA,20,B4,FF,AS,BS, 88 SAAB 3420 DATA 00,B9,00,02,30,08,20,33, SB 


168 KIUW Sonderhett 2 
KU HENECOMPUTERWORLH ZOOM 


EABB 
BACO 
BACB 
2ADDO 
2ADB 
BAEO 
BAEB 
SAF® 
EAFB 
2B08 
2BOB 
2B18 
2B18 
2B20 
eB28 
2B30 
2B38 
E2B40 
2B4B 
2B50 
EBSB 
2B60 
2B68 
2B70 
2B78 
2B88 
2B8B 
2B390 
2B398B 
EBAO 
EBAB 
2BBO 
2BBB 
2BCDO 
2BCB 
eBD2® 
2BD8B 
2BE® 
EBEB 
EBFO 
eBFB 
2C008 
2C08 
ec1o 
ec18 
2eC208 
eCc28 
2C30 
2C38 
ec4H® 
ECHB 
2CS® 
2C5SB 
eC608 
eC6B 
8C70 
eC78 
2C828 
eCBB 
2C3908 
2CSB 
eCcAD 
ECAB 
E2CBO 
ECBB 
2CCo 
2CCB 
ECDD® 
2CDB 
eCEB® 
SCEB 
ECF® 
ECFB 
2028 
2008 
2D18 
2D18 
2D28 
2D28 
2038 
2D38 
2D40® 
2D48 
- EDS5@ 
2D58 
2DEO 


WWW MOMESDMRUTERWORLD EON- 


3449 
3458 
3468 
3478 
3482 
3498 
3528 
3518 
3520 
3538 
3548 
3559 
3568 
3578 
3588 
3598 
3698 
3618 
3628 
3638 
3640 
3650 
3669 
3678 
3688 
36998 
3708 
3718 
37208 
3738 
3748 
3750 
37608 
3770 
3780 
3798 
3808 
3810 
3820 
3830 
3840 
3858 
3860 
3870 
3888 
3898 
3902 
3910 
39208 
3930 
3940 
3958 
3960 


3970. 


3988 
3998 
40008 
401@ 
4020 
4030 
4040 
4058 
4060 
4078 
4080 
40390 
41008 


"4118 


4120 
4138 
4140 
4158 
4168 
4178 
4180 
41990 
42008 
4218 
4229 
42308 
4240 
4259 
42608 
4278 
4288 
4298 
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DATA 
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DATA 
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DATA 
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DATA 
DATA 
DATA 
DATA 


Maschinensprache 


23,F0,09,C8,E8,08,F2,EA, 
EA,4C,DF,29,84,FE,AD,ıA, 
3F,85,FB,AD,1B,3F,85,FcC, 
AO,08,B1,FB,D8,83,4C,47, 
2eB,78,A9,36,85,01,A6,7A, 
AB,00,38, BD, 00,202,F1,FB, 
F0,37,DD,882,02,F8,4C,Cs, 
80,00,905,E8,BD,00,02,20, 
33,23,F0,04,88,4C,1D,2B, 
CB,B1,FB,CD,26,3F,F®,03, 
4C,23,28,C8,B1,FB,85,14, 
CB,Bi1,FB, 85, 15,A5S,FE,85, 
7A,A9,37,85,01,58,4C0,BF, 
2C,C8,E8,00,BD,C8,B1,FB, 
18,FB,C8,C8,C8,C8,18,58, 
65,FB,85,FB,30,02,E6,FC, 
4C,D6,2A,AD,26,3F,C9,02, 
so, oD, AB,30,3F,85,7A,#A3, 
20,80,26,3F ,4C,A2,2A,AD, 
34,3F,F0,0A,A9,37,85,01, 
58,A3,FF,4C,53,29,A8,07, 
4C,08,2D,A0,02,20,CC,21, 
20,73,08,0D8,03,4C,DF,23, 
18,20,4F,29,A5,14,8D,2A, 
3F,AS,15,80,2B,3F,20,11, 
25,20,44, ES, A3,20,48,A9, 
02,48,6C0,2A,3F,A0,02 ‚eo, 
CC,21,20, 73, 88,00,23,4C, 
4D,2C,18,20,4F,29,A6G,14, 
A4,15,8E,1E,3F,8C,1F,3F, 
20,13, ec, 18,20,4F,29,A6, 
14,A4,15,8E,208,3F,8C,21, 
3F,20,13,2C,20,79,00,F0, 
@eE,18,20,4F,29,A6,14,A4, 
15,8E,1A,3F,8C,1B,3F,20, 
13,2C,18,20,4F,29,A6,14, 
Aut, CH 8E,1C,3F,8C,1D,3F, 
AD, 1A,3F,85,FB,AD,iB,3F, 
85,FC,A®,00,98,31,FB, 28, 
B8,23,AD,1E,3F,85,FB,AD, 
1F,3F,85,FC,AB,05,B1,FB, 
F0,03,C8,D0,F9,C8,18,38, 


65,FB,Ad.01.31,FB.AS.FC. 
69,00,C8,31,FB,20,03,28, 
4C,4D,2C,A4,7A,B9,00,02, 
20,33,29,D0,08,20,3D,23, 
D®,02,E6,7A,60,4C,DF,29, 
48,4A,4A,4A,4n,20,41,2C, 
68,29,0F,20,41,2C,8n,4n, 
YA,4A,4A,20,41,2C0,80,29, 
OF ,09,30,20,1F,29,30,02, 
69,06,4C,D2,FF,A9,00,20, 
D2,FF,A9,00,20,D2,FF,Rg, 
20,20,D2,FF,AE,1E,3F,AD, 
1F,3F,20,28,2C,A9,2D,20, 
D2,FF,AE,20,3F,AD,21,3F, 
20,28,2C,49,20,20,D2,FF, 
A9,20,20,D2,FF,AE,1A,3F, 
AD,1B,3F,20,28,2C,49,2D, 
20,D2,FF,AE,1C,3F,AD,1D, 
3F,20,28,2C,A9,0D,20,D2, 
FF,A9,20,20,D2,FF,AE,OrF, 
3F,AD,10,3F,20,28,2C,#s, 
20,20,D2,FF,AE,22,3F,AD, 
23,3F,20,28,2C,A9,0D,20, 
D2,FF,A9,00,4C,D2,FF,AD, 
29,3F,F0,2A,C9,2B,D8,12, 
18,A5,14,6D,27,3F,85,14, 
AS,15,60,28,3F,85,15,4C, 
E3,2C,38,AD,27,3F,E5,14, 
85,14,AD,28,3F,ES,15,8S, 
15,49,00,80,29,3F,A4,7a, 
B9,00,02,20,45,29,00,1e, 
80,29,3F ,Aß,14,8E,27,3F, 
A6,15,8E,28,3F,E6,7A,4C, 
SD,29,60,49,37,85,01,58, 
88,98,0A,48,A9,0D,20,D2, 
FF,68,48,B3,87,2E,85,FE, 
BS,88,2E,85,FF,A®,FF,CB, 
B1,FE,FO,06,20,D2,FF,4C, 
27,2D,R0,00,89,73,2D,20, 
D2,FF,C8,C0,06,00,F5,AD, 
2C,3F,F@,27,n2,00,BD,7s, 
2D,20,02,FF,EB,E0,03,D9, 
FS5,AD,01,3F,80,03,3F,RE, 
00,3F,8E,02,3F,20,CD,BD, 
A9,00,80,2C,3F,20,3B,22, 


2058 
2078 
2078 
2088 
2088 
2088 
2038 
2DA® 
2DAB 
2088 
2DB8 
Eller) 
2DC8 
2008 
2008 
2DE® 
2DES 
2DF® 
2DF8 
2E08 
2EOB 
2E18 
2EIB 
2E28 
2E28 
2E30 
2E38 
2E4® 
2E48 
2ES® 
2ESB 
2EEO 
2EEB 
2E78 
2E78 
2EB® 
2EBB 
2E30 
2E38 
2ER® 
ZERB 
2EBO 
2EBE 
2ECO 
2ECB 
2EDO 
2EDE 
2EE® 
2EEB 
2EF® 
2EFB 
2FO® 
2FOB 
2F1® 
2Fı8 
2F20 
2F28 
2F30 
2F38 
2F40 
2F48 
2FS® 
2FS8 
2F&EO 
2F&EB 
2F7® 
2F78 
2FB® 
ZFBB 
2F38 
2FS8 
2FAD 
2FAB 
2FB® 
2FBB 
2FCO 
2FCB 
2FD® 
2FDB 
2FEO 
2FEB 
2FF® 
2FFB 
3800 
3208 
3818 
3218 


4308 
4319 
4329 
4330 
4349 
4359 
4368 
4378 
4388 
4339 
4408 
4418 
4420 
4430 
4440 
4450 
4468 
4478 
4480 
4430 
4508 
4518 
45208 
4530 
4548 
4558 
4568 
4578 
4588 
45908 
4608 
4618 
4620 
46398 
4640 
4650 
46608 
4678 
4680 
46390 
4700 
4710 
4728 
4738 
4748 
4758 
4768 
4778 
4788 
4798 
4800 
4818 
4828 
4830 
4849 
4850 
4860 
4870 
4888 
4838 
4908 
4910 
4920 
4938 
4940 
4958 
4960 
4970 
49808 
49398 
sp2o 
5818 
Ssp20 
5938 
Sso40o 
5959 
59608 
5979 
Ss888 
5038 
5188 
5118 
5128 
5138 
Sı149 
Ssı58 
5168 
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DATA 


20,51,22,A9,2D,20,D2,FF, 
4C,55,21,20,45,52, SB, ES 
52,00,49,4E ‚2o, 4C,49, 4E, 
45,20,43,4F,4D,4D,41,4E, 


44,00,53,59,4E,54.41.5B, 
89,43,4E,50,55,54,2D,4C, 
49,4E,45,29,54,4F,4F,20, 
4C,4F,4E,47,00,4D,49,53, 
53,49,4E,47,20,46,49,4C, 
45,4E,41,4D,45,00,46,43, 
4C,45,4E,41,4D,45,20,54, 
4F,4F,20,4C,4F,4E,47,00, 
49,4C,4C,45,47,41,4C0,20, 
4C,49,4E,45,2D,4E,55,4D, 
42,45,52,00,4C,41,42,45, 
4C,20,4E,4F,54,20,46,4F, 
SS,4E,44, 00,49, 4C,4C0,45, 
47,41,40,20,51,55,11,4E, 
54,49,54,59, 00,53, 4F,55, 
52,43,45,20,43,4F,44,45, 
20,54,4F,4F,20,4C,4F,4E, 
47,00,4C,41,42,45,4C,20, 
41,4C,52,45,41,44,59,20, 
45,58,49,53,54,53,00,4D, 
41,4B,52,4F,20,41,4C,52, 
45,41,44,59,20,45,58,49, 
53,54,53,00,4C,41,42,45, 
4C,20,46,49,4C,45,20,54, 
4F,4F,20,4C,4F,4E,47,00, 
49,4C,4C,45,47,41,4C,20, 
4F,50,43,4F,44,45,00,42, 


S2,41,4E,43,48,20,54,4F, 
4F,20,4C,4F,4E,47,00,41, 
44,52,45,53,53,98,4C,41, 
42 ,45,4C,20,44,45,46,49, 
4E,49,54, 49, 4F,4E,00,82, 
2D,8A,2D,91,2D,AS,2D, BB, 
2D,C8,2D,D0C,2D,EC,2D,FD, 


2D,12,2E.27,2E,3C.2E.50. 


BE,SF,2E,6F,2E,76,2E,42, 
41,26,25,42,52,2F,25,50, 
S2,4D,22,4C,49,4D,22,46, 
4F,76,23,43,4C,B7,23,41,; 
55,F5,23,4E,55,25,24,46, 


49,7A,25.44,45.2F 26.54. 
4F,E6,26,47,45,8F,27,50, 
S5,61,27,44,49,D4,27,44, 
43,91,28,41,53,F7,2E,52, 
55,5A,2B,53,45,84,2B,4F, 
4C,E9,2B,4C,41,0C,39,00, 
A®,02,20,CC,21,A2,00,8£E, 
2D,3F,20,73,00,09,03,4C, 
C6,30,C9,4C,D®,0E,EB,BE, 
2D,3F,A4,7A,20,CC,21,20, 
73,00,F0,EB,C3,22,F0,05, 
AB,B2,4C,0B,2D,C6,7A,2®, 
21,27,20,93,27,4C,C6,30, 
AO,04,A2,00,B1,49,30D,00, 
02,F0,08,C9,3B,F®,04,EB, 
C8,D0,F1,A0,02,B1,49,8D, 
00,3F,80,02,3F,C8,B1,49, 
80,01,3F,80,03,3F,60,n0, 
00,B1,49,AA,C8,B1,49,85, 
4A,86,49,60,78,n9,36,85, 
01,AD,1A,3F,85,A4,AD,1B, 
3F,85,A5,20,C2,2F,F@,44, 
AD,00,B9,00,02,38,F1,n4, 
F0,1A,C9,80,00,19,C8,59, 
00,02,F0,04,C3,20,D0,0rF, 
B1,A4,CD,2E,3F,D®,08,n®, 
OA,4C,0B,20,C8,0®,DB,A®, 
FF,C8,B1,A4,10,FB,C8,C8, 
C8,C8,18,98,65,A4,85,A4, 
90,02,E6,A5,20,C2,oF,F®, 
03,4C,78,2F,A9,37,85,01, 
58,60,A5,A4,C5,8B,D0,04, 
AS,AS,C5,8C,60,A®,00,Re, 
22,50,00,02,C3,3B,Fo,42, 
E8,BD,20,02,C9,2E,D0,47, 
CA,BD,00,02,C3,20,F0,04, 
C9,80,00,3A,E8,E8,BD,00, 
02,F0,27,C3,3B,F®,23,D9, 
32,30,08,17,E8,C8,BD,00, 


02,F0,17,C9,38,F8,13,09 


’ 


32,38,00,11,C8,98,4A,E8, 
85,7A,60,C8,C8,B3,32,30, 


D9,D0D4,A9,02,60,C8,CA,BS3, 
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3920 32,30,D8,CA,F®,F4,EB,C9, 23 32C8 6020 DATA 86,7A,20,73,00,R6,7A,86, 08 
3828 51802 DATA 00,F0,EF,C9,3B,F0,EB,E8, 85 3208 6830 DATA B6,A9,200,R9,00,80,31,3F, CA 


3830 51398 DATA D8,A7,44,45,45,4E,4D,44, 2B 32D8 56040 DATA AB,00,R6,B56,BD,00,02,C9, 85 
3838 5290 DATA 4D,45,42,41,4F,53,42,53, EE 3eEO 6858 DATA 3B,F0,00,09,2B,3A,00,1A, ES 
3040 S21B DATA 53,49,44,53,46,50,08,00, F2 32E8 6068 DATA E8,C8,B9,2B,3A,C9,3F,F®, 6E 
3048 5220 DATA AB,10,4C,0B,2D,Ad,FF,C8, 34 32F@ 6079 DATA 12,0D,00,02,00,00,E8,C8, 16 
3050 5230 DATA B3,08,02,F8,12,30,F1,C9, DS 32F8 6882 DATA BD,00,02,09,2B,3A,D00,04, A3 
3058 S24® DATA 22,F0,ED,C9,2C,F0,ES,C3, B3 3308 6830 DATA 18,60,C8,C8,C8,EE,31,3F, 85 
3060 S258 DATA 3B,F0,E5,C9,20,00,E8,C8, D8 3308 56108 DATA CO,EE,DO,CE,AD,00,4C,0B, AB 
306B S2608 DATA C8,CB,AS,88,80,35,3F,A5S, O0 3310 6118 DATA 2D,AS,FF,80,32,3F,AD,31, 65 
3078 S278 DATA 8C,80,36,3F,18,98,65,8B, 51 3318 56128 DATA 3F,C9,03,90,12,C9,0D,B8, 31 
3078 S288 DATA 85,8B,90,02,E6,8C,RS,8C, Fa 3320 56138 DATA OE,C9,06,F0,0A,C9,0n,F®, B3 
3088 S290 DATA CD,1D,3F,98,0E,00,07,AS, 00 3328 56140 DATA 06,A49,08,80,32,3F,50,86, AS 
3088 5300 DATA BB,CD,1C,3F,30,05,A0,0C, BA 3330 6150 DATA 7A,20,73,08,80,33,3F,F®, 75 
30832 5318 DATA 4C,0B,2D,AD,35,3F,85,88, B1 3338 61608 DATA 04,C9,38B,00,06,A9,00,80, 78 
3038 5320 DATA AD,36,3F,85,8C,AQ,FF,C8, 53 3340 6178 DATA 32,3F,60,C9,41,00,14,20, F® 
30RABd S33® DATA B9,09,02,31,8B,F0,04,C9, 01 3348 6188 DATA 73,00,F0,09,C9,3B,F0,05, Di 
30AB S34Q DATA 20,00,F4,88,89,00,02,09, GE == 2228 OL ED, 3C 
3080 5350 DATA 80,91,88,C8,60,18,38,65, 2D A 32,3F,60,AD,33,3F,C9,23, 40 
30B8 S360 DATA 88,85,88,80,22.3F.30.05. 72 3360 5218 DATA D9,76,20,73,00,F0,6E,C9, BD 
30C® 5370 DATA E6,8C,EE,23.3F.60.AD.0D. A3 3368 6228 DATA 3B,F8,6A,C9,22,00,13,20, 33 
30C8 5380 DATA 3F,85,43,AD.BE,3F.BS.4A, 61 3370 6238 DATA 73,00,85,14,49,00,85,15, FB 
3008 5338 DATA AD,1A,3F,85,8B,AD,1B,3F. 07 3378 6240 DATA 20,73,00,C9,22,08,56,4C, 42 
3008 S402 DATA 85,8C,A9.00,AB.S1.BB.Aa. 3A, 3388 5258 DATA CA,33,A5,7A,8D,47,3F,20, 26 
30E2O S410 DATA 01,80,2C,3F,A8,00,B1,49, 63 3388 56268 DATA 73,00,AE,47,3F,86,7A,C9, 43 
30E8 S422 DATA C8,11,49,D0,83,4C,74,31, 2a 3338 6278 DATA 2C,D0,2F,20,79,00,C9,4C, 61 
30F® S43® DATA 20,30,2F,AD,00,02,C9,3B, FE 3338 6288 DATA D9,10,E6,7N,20,73,08,18, Cı 
30F8 S440 DATA D98,03,4C,35,31,20,CD,2F, 32 33A@ 6238 DATA 20,4F,29,A9,00,85,15,4C, 97 
3180 5450 DATA C3,01,00,3C,A0,00,B3,00, B3 33AB 6398 DATA CA,33,C9,48,09,14,E6,7A, 3E 
3108 54568 DATA 22,10,05,A8,02,4C,0B,2D, EC 3388 63128 DATA 20,73,00,18,20,4F,29,A5, EB 
3118 S47@ DATA A9,00,8D0,2E,3F,20,64,2F, SB 33B8 6320 DATA 15,85,14,A9,00,85,15,4C, 41 
3118 5488 DATA 20,40,30,A9,00,31,88,C8, 8D 33C0 6339 DATA CA,33,18,20,4F,29,AS,15, 44 
3120 5498 DATA 84,80,18,20,4F,29,A4,80, 2C 33C8 63408 DATA D9,06,A9,04,80,32,3F,60, A7 
3128 SS@® DATA AS,14,91,8B,CB,A5,15,91, 3E 3300 6350 DATA AB,28,4C,0B,2D,4C,40,32, CB 
3130 5518 DATA 8B,C8,20,B5,30,A0,00,38, 28 3308 5368 DATA AD,33,3F,C9,28,00,4F,20, 78 
3138 5522 DATA 91,8B,20,57,2F,4C,E4,30, 66 33E0O 5378 DATA 73,00,F0,F1,C9,3B,F®,ED, 02 
x 3140 SS3@ DATA C9,02,F0,30,C9,03,D0,ED, 2D 33E8 6380 DATA 18,20,4F,29,20,7A,34,20, D3 
3148 5542 DATA AB,00,89,00,02,10,05,A0, AF 33F® 63390 DATA 79,00,C3,2C,00,14,20,73, 7E 
3150 5558 DATA 02,4C,0B,20,A9,01,80,2E, 3B 3 33FB 64090 DATA 00,C9,58,09,D8,20,73,00, EB 
3158 5S60 DATA 3F,20,64,2F,20,4D,30,R9, AE 3400 6410 DATA C9,29,00,01,A9,07,80,32, SB 
31690 SS78 DATA 01,91,8B8,C8,AS,49,91,8B, 35 3408 6420 DATA 3F,69,C9,29,08,C7,20,73, 35 
3168 5588 DATA C8,AS,4A,91,8B,C8,20,B5, ®B 3410 6438 DATA 08,F0,15,C9,3B,F@,11,C9, Fa 
3170 .S598 DATA 30,4C,35,31,A9,00,85,3F, D6 3418 6440 .DATA 2C,09,BA,20,73,00,C9,53, DB 
3178 S690 DATA A3,08,85,40,AD,0D,3F,85, 3F 3420 54508 DATA 00,B3,A93,08,80,32,3F,60, F7 
3180 S5610 DATA 49,AD,®E,3F,85,4A,A0,00, 46 3428 564562 DATA AS,0C,80,32,3F,60,18,20, CF 
3188 S620 DATA 81,49,C8,11,49,00,03,4C, 4F 3438 6478 DATA 4F,29,20,7A,34,20,79,00, 59 
3138 S630 DATA CA,35,20,30,2F,AD,00,02, 05 3438 6488 DATA C9,2C,F0,10,AS,15,F0,06, FS 
3198 S649 DATA C9,3B,00,03,4C,E2,34,AD, 4C 3440 6430 DATA A9,022,80,32,3F,60,A9,03, 86 
31Ad S6S® DATA 00,02,C9,80,F0,2C,20,CD, 5D 3448 6580 DATA 80,32,3F,60,20,73,00,C9, ıF 
31AB S668 DATA 2F,C9,01,F0,25,C9,03,F®, ES 3450 56512 DATA S8,09,10,A5,15,F0,06,A9, 77 
31B@ 5678 DATA 21,49,00,8D,2E,3F,20,64, 98 3458 6520 DATA 05,80,32,3F,60,A49,09,80, 3F 
31B8 S588 DATA 2F,20,40,30,A9,00,31,8B, DA 3460 6538 DATA 32,3F,60,C9,59,F0,03,4C, AC 
31Cd 5638 DATA C8,AS,3F,931,8B,C8,A5,40, F3 3468 6549 DATA 40,34,A5,15,F0,06,49,06, 27 
31CB 5708 DATA 91,8B8,C8,A9,00,91,8B,20, FF 3470 6550 DATA 80,32,3F,60,A9,0A,80,32, 33 
3108 5718 DATA BS,38,20,CD,2F,00,03,4C, EF 3478 6550 DATA 3F,60,A4,7A,A5,14,25,15, AA 
3108 _5720 DATA 90,34,C9,95,00,0F,18,20, DB 3480 65708 DATA C3,FF,D,08,C8,B9,00,02, SC 
31Eß 5738 DATA 4F,29,A5,14,85,3F,AS,15, 8C 3488 6588 DATA 20,33,29,00,F7,84,7A,60, D3 
31Eß S74® DATA 85,49,4C,E2,34,C09,02,00, 4D 3430 6530 DATA 29,B5,32,B0,4D,A9,01,8D0, 07 
31Fa S75® DATA 03,4C,CA,3S,C9,07,00,66, 77 3498 6590 DATA 34,3F,28,11,33,49,00,8D, 02 
31F8 5768 DATA A9,00,85,BD,C6,7A,20,73, 6A E 34AB 65610 DATA 34,3F,20,ED,34,AD,32,3F, A4 
3208 5778 DATA 08,F0,51,C9,3B,F0,4D,C9, 63 34AB 66208 DATA C3,02,80,0R,R9,01,85,BD, DB 
3208 5788 DATA 2C,F0,F3,C9,22,00,18,#4, 2E 34B0 6638 DATA 20,48,32,4C,E2,34,C9,02, 32 
3218 5798 DATA 7A,C8,B9,00,02,F0,30,C9, F2 34B8 55640 DATA F,0C,C9,05,F0,08,C39,06, 58 
3218 5808 DATA 22,F0,07,E6,BD,C8,E6,7A, BS 34C® 65650 DATA F9,04,C9,0C,D0,0A,A9,03, 12 
3220 S818 DATA D9,F0,E6,7A,4C,FE,31,18, B4 34C8B 565660 DATA 85,80,20,48,32,4C,E2,34, 34 
3228 SB208 DATA A9,01,80,34,3F,20,4F,29, 45 34D8 6678 DATA AD,31,3F,C9,1B,F@,EF,C9, 43 
3238 S838 DATA A9,00,80,34,3F,A5,15,D0, El 34D8 565680 DATA 1C,F®,EB,A9,02,85,BD,20, 89 
3238 SB48 DATA 9@C,C6,7A,E6,BD,4C,FE,31, 18 34E® 6692 DATA 48,32,R9,00,80,34,3F,28, 36 
3240 S8S® DATA AB,02,4C,0B,2D0,4C,09,33, 5C 34E8 6790 DATA 57,2F,4C,86,31,A2,080,BD, Cı 
3248 SB6B® DATA 18,A5,3F,65,BD,85,3F,30, 35 34F® 6710 DATA EE,3A,CD,31,3F,F0,21,E8, D8 
3258 5870 DATA 02,E6,40,60,A5S,BD,F®,E8, ED 34F8 6720 DATA D8,FS,AD,32,3F,C9,0A,D®, 07 
3258 5889 DATA 20,48,32,4C,E2,34,C3,08, 2C 35080 56730 DATA 08,R9,06,8D,32,3F,4C,ED, 2B 
3260 5898 DATA 09,15,A9,02,85,BD,28,48, @1 3508 6748 DATA 34,C9,03,00,06,CE,32,3F, CB 
3268 59008 DATA 32,C6,7A,20,73,00,F0,D0, S8 3512 56758 DATA 4C,ED,34,A®,0F,4C,0B,2D, 36 
3278 S918 DATA C9,3B,F8,CC,4C,E2,34,C9, 87 3518 67608 DATA BD,EE,3B,CD,32,3F,D8,07, 29 
3278 5928 DATA 03,00,1F,C6,7A,20,73,00, 60 3528 6778 DATA 60,80,33,3F,AD,37,3F,F®, Se 
32898 5938 DATA FO,BE,C9,38,F0,BA,18,20, ED 3528 56780 DATA 05,RD,39,3F,91,3F,AD,2D, 24 
3288 SS4® DATA 4F,29,18,A5,3F,65,14,85, 03 3538 6790 DATA 3F,F®,75,BE,3F,3F,8C,40, 83 
3238 5950 DATA 3F,AS,40,65,15,85,48,4C, Fa 3538 6808 DATA 3F,AD,3B,3F,00,19,AE,3C, B7 
3238 SS69 DATA E2,34,C9,04,00,F9,C6,7A, BE 3548 68129 DATA 3F,AD,3D,3F,20,28,2C,A3, OC 
32A8 S972 DATA 29,73,00,F0,9B,C9,3B,F®, DE 3548 6828 DATA 20,20,02,FF,AD,3A,3F,69, ıC 
32AB S980 DATA 97,A9,05,85,BD,20,48,32, 21 3550 683@ DATA 26,80,3A,3F,EE,3B,3F,A9, BD 
32B8 5998 DATA 4C,E2,34,38,69,A2,00,AD, 78 3558 6840 DATA 28,20,02,FF,AD,39,3F,20, 66 
32B8 6029 DAIA 00,02,C9,80,F®,0A,E8,BD, 56 3562 68508 DATA AC,35,AD,3A,3F,69,03,8D, 36 
32C0 6810 DATA 00,02,F0,EF,C9,280,D2,F6, 81 3568 6860 DATA 3A,3F,EE,3B,3F,AD,3B,3F, 3C 
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3578 
3578 
3588 
3588 
3599 
3598 
35AB 
35AB 


3588 


35BB 
35C0 
35C8 
35D8 
35D8 
35E® 
35EB 
35F® 
35F8 
3698 
3608 
3618 
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3628 
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3648 
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6878 
6880 
6899 
6308 
6318 
69208 
6939 
63498 
6959 
63569 
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7819 
7920 
7838 
7940 
7958 
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7978 
7088 
7030 
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7ı18 
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7198 
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7218 
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7230 
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7258 
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75408 
7558 
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7698 
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DATA 
DATA 
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DATA 


Maschinensprache 


C9,04,90,2E,A9,00,80,38, 
3F,18,AD,3C,3F,69,03,8D, 
3C,3F,30,03,EE,30,3F,CE, 
3A,3F,AD,41,3F,F@,0D,A3, 
00,80,3A,3F,A3,0D,20,D2, 
FF,4C,02,35,20,8F,38,EE, 
41,3F,AE,3F,3F,AC,4®,3F, 
AD,39,3F,60,48,4A,4a,4a, 
4A,09,30,C9,3A,30,02,563, 
06,20,D2,FF,68,29,0F,09, 
30,C9,3A,30,02,69,96,4C, 
D2,FF,AO,00,59,F3,35,20, 
D2,FF,C8,C0,0F,D8,F5,a3 
31,20,D2,FF,AD,2D,3F,F®, 
21,49,00,20,D2,FF,A3,0D, 
20,02,FF,A9,37,85,01,58, 
4C,02,36,20,0D,12,45,4E, 
44,20,4F,46,20,50,41,53, 
53,20,AD,0D,3F,85,49,AD, 
DE,3F,85,4A,A9,00,80,37, 
3F,8D,3A,3F,8D,38,3F,85, 
3F,A9,08,85,40,R0,00,Bl, 
49,C8,11,49,D0,83,4C,46, 
38,A5,3F,8D0,3C,3F,AS,40, 
80,3D,3F,A9,00,80,41,3F, 
20,30,2F,AD,80,02,C9,38B, 
D8,03,4C,27,38,20,CD,er, 
80,38, 3F,C9,02,D8,03,4C, 


46,38,C9,05,D8,15,18,20, 


YF,29,A5,14,85,3F,8D,3C, 
3F,A5,15,85,40,80,30,3F, 
4C,27,38,C9,26,D0,06,8D, 
37,3F,4C,27,38,AD,38,3F, 
C9,07,00,48,AB,00,C6,7A, 
20,73,00,F0,37,C9,3B,F®, 
33,C9,2C,F0,F3,C9,22,D0, 
1A,A6,7A,EB,BD,00,02,F® 
23,C9,22,F0,09,20,21,35, 
CB,EB,E6,7A,D®,EE,E6, 7A, 
4C,80,36,84,80,18,20,4F, 
29,A4,BD,AS,14,20,21,35, 
C8,4C,7E,36,84,BD,20,48, 
32,4C,27,38,C9,08,D2,ın, 
18,20,4F,29,A0,00,n5,14, 
20,21,35,C8,45,15,28,21, 
35,C8,84,BD,20,48,32,4C, 
27,38,C9,09,D8,14,18,20, 
4F,29,18,45,3F,65,14,85, 
3F,AS,40,65,15,85,4®,4C, 
27,38,C9,0A,D0,30,A6,7n, 
BD,20,02,F0,0C,C3,3B,F®, 
03,E8,00,F4,R9,00,3D,00, 
02,20,79,00,20,F3,BC,AD, 
00,A2,00,B5,61,20,21,35, 
C8,E8,E0,05,D8,F5,86,BD, 
20,48, 32,4C,27,38,C9,00, 
D8,F9,20,85,32,B®,F4,20, 
11,33,8E,3E,3F ,20,ED,34, 
AD,00,8A,20,21,35,AD,32, 
3F,C9,02,89,09,C8,84,BD, 
20,48, 32,4C,27,38,C9,02, 
F®,0C,C9,05,F@,08,C9,06, 
F®,04,C9,0C,D8,15,C8,#5, 
14,20,21,35,C8,A5,15,20, 
21,35,C8,84,BD,20,48,32, 
4C,27,38,C9,0B,F0,10,En, 
C8,AS,14,20,21,35,C8,84, 
BD, 20,48, 32,4C,27,38,AD, 
3E,3F,85,7A,20,73,00,C9, 
30,D2,4C,20,73,00,C39,28, 
D2,19,20,73,08,18,20,4F, 
29,A5,15,D8,35,45,14,C8, 
80,B0,2F,A8,01,20,21,35, 
4C,72,37,C9,2D,F0,05,n®, 
02,4C,08,20,20,73,00,18, 
20,4F,29,A5,15,D0,13,#S, 
14,C9,81,B0,0D,A®,01,38, 
A9,00,ES,14,29,21,35,4C, 
72,37,A0,0E,4C,0B,2D,18, 
20,4F,29,49,02,85,BD,20, 
48,32,38,45,14,E5,3F,85, 
14,45,15,E5,40,F®,0D,C3, 
FF,D®O,DF,AS,14,C9,80,90. 
D9,4C,12,38,A5,14,C9,8®, 
BO,D0,38,AS,3F,ES,02,85, 


3818 


3828 
3828 


3830 


3838 
3840 
3848 
3850 
3858 
3850 
3858 
3878 
3878 
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3888 
3830 
3838 
38A2 
38RB 
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3858 
38C0 
33C8 
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38F8 
3908 
3908 
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3398 
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3300 
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39E8 
33E8 
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3A9a 
3A28 
3A18 
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3R20 
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7368 
7970 
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73938 
8008 
8012 
80208 
8030 
8040 
8058 
8060 
8070 
8080 
89308 
8100 
8110 
8120 
8130 
8140 
8150 
8168 
8170 
8188 
8199 
82098 
8219 
8229 
8230 
8240 
8250 
8260 
8279 
8289 
8238 
8308 
8318 
8328 
8338 
8349 
8350 
8369 
8370 
83808 
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8400 
8410 
8420 
8430 
8440 
8459 
84560 
8470 
8489 
8438 
8508 
85198 
8520 
8538 
8548 
8550 
8568 
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3F,B0,02,C6,40,A0,01,nS, 
14,29,21,35,4C,72,37,AD, 
2D,3F,F®,14,AD,3A,3F,F®, 
03,CE,aA,3F,20,8F,38,#5, 
CB,F®,0B,A9,00,80,3B,3F, 
20,57,2F,4C,1D,36,A0,00, 
B9,F3,35,20,D2,FF,C8,C0, 
OF,D®,FS,A9,32,20,De,FF, 
A®,00,893,7C,38,20,D2,FF, 
C8,C0,13,00,F5,A6,3F,AS, 
49,20,28,2C,A9,0D,20,De, 
FF,A9,0D,20,D2,FF,A9,00, 
80,2C,3F,60,00,0D,45,4E, 
44,20,4F,46,20,50,52,4F, 
47,52,41,4D,20,3A,20,AD, 
41,3F,F@,10,AD,aA,3F,F®, 
05,49,20,20,D2,FF,A9,00, 
80,3A,3F,60,AE,3A,3F,A9, 
20,20,D2,FF,E8,E0,10,00, 
F6,A9,00,80,3A,3F,AE,00, 
3F,AD,01,3F,85,62,86,63, 
A2,90,38,20,49,8C,29,D0D, 
BD,20,98,22,49,20,20,De, 
FF,AS,14,8D,42,3F,AS,15, 
80,43,3F,A5,49,85,5F,A5, 
4A,85,60,A0,00,B1,5F,85, 
FE,C8,B1,5F,85,FF,20,BD, 
22,AD,42,3F,85,14,AD,43, 
3F,85,15,60,0D,0D,12,4C, 
41,42,45,4C,2D,46,49,4C, 
45,20,3A,00,0D,A0,02,20, 
CC,21,20,73,00,F0,3D,#5, 
74,80,30,3F,18,20,4F,29, 
A9,00,20,D2,FF,A9,00,20, 
D2,FF,AE,30,3F,CA,E8,BD, 
00,02,F0,0N,C9,20,F0,06, 
20,D2,FF,4C,2E,39,49,20, 
20,D2,FF,A9,3D,20,D2,FF, 
A3,20,20,D2,FF,AB,14,A5, 
15,4C,28,2C,A0,00,B9,FC, 
38,20,D2,FF,C8,C0,11,D0, 
FS,A9,00,80,44,3F,AD, In, 
3F,85,49,AD,1B,3F,85, 4A, 
78,49,36,85,01,A0,00,B1 
49,00,03,4C,25,3A,B1,49, 
30,0A,20,D2,FF,EE,44,3F, 
C8,4C,7E,39,29,7F,20,De, 
FF,A9,20,20,02,FF,A9,3D, 
20,D2,FF,A9,20,20,De,FF, 
C8,CB,B1,48,AA,CB,B1,49, 
8C,46,3F,20,28,2C,18,AD, 
44,3F,69,08,80,44,3F,C9, 
14,80,08,49,14,8D,45,3F, 
4C,E8,39,C9,28,B0,08,#9, 
28,80,45,3F,4C,E8,39,C9, 
3C,B0,08,49,3C,8D,4S,3F, 
4C,E8,39,A9,0D,20,D2,FF, 
A9,09,8D,44,3F,4C,F9,39, 
AE,44,3F,R9,20,20,D2, FF, 
EE,44,3F,E8,EC,45,3F,D®, 
F2,18,EE,46,3F,AD,46,3F, 
65,49,85,49,30,02,E6,4n, 
A®,00,B1,43,F0,17,A5,CB, 
F®,13,C9,3F,D®,0C,AS,CB, 
F®,08B,C3,3F,FO,F8,C9,40, 
FO,F4,4C,7E,39,A9, 37,85, 
01,58,69,41,44,43,41,4E, 
44,41,53,40,42,43,43,4e, 
43,53,42,45,51,42,49,54, 
42,4D,49,42,4E,45,42,50, 
4C,42,52,4B,42,56,43,4e, 
56,53,43,4C,43,43,4C,44, 
43,4C,49,43,4C,56,43,4D, 
50,43,50,58,43,50,59,44, 
45,43,44,45,58,44,45,59, 
45,4F,52,49,4E ,43,49,4E, 
58,49,4E,59,4A,4D,5®,4n, 
53,52,4C,44,41,4C,44,58, 
4C,44,59,4C,53,52,4E,4F, 
50,4F,52,41,50,48,41,50, 
48,50,50,4C,41,50,4C,50, 
S52,4F,4C,52,4F,52,52,54, 
49,52,54,53,53,42,43,53, 
45,43,53,45,44,53,45,49, 
53,54,41,53,54,58,53,54, 
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19008 
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1018 
19020 
1028 
19038 
1038 
1040 
1248 
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1080 
1888 
198398 
1238 
10AD 
19AB 
1069 
10BB 
10C0 
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DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


Maschinensprache 


59,54,41,58,54,41,59,54, 
53,58,54,58,41,54,58,53, 
54,59,41,3F,3F,3F,41,41, 
58,44,43,50,49,53,43,4C, 
41,58,52,4C,41,52,52,41, 
53,4C,4F,53,52,45,0A,22, 
38,3F,38,22,02,3F ‚24,22, 
02,38,38,22,02,3F ‚09,22, 
38,3F,38,22,02,3F,0D,2e, 
38,3F,38,22,02,3F,1C,01, 
38,3D,06,01,27,3D,26,01, 
27,38,06,01,27,30,07,01, 
38,3D,38,01,27,3D,2C,®1, 
38,3D,38,81,27,3D0,29,17, 
38,48,38,17,20,40,23,17, 
20,38,1B,17,20,40,0B,17, 
40,38,38,17,20,40,0F,17 
38,40,38,17,20,40,2A,08 
38,3E,38,00,28,3E,25,0® 
28,38,1B,00,28,3E,0C,00, 
38,3E,38,00,38,3E,2E,®0, 
38,3E,38,00,38,3E,38,2F, 
38,39,31,2F,30,39,16,38, 
35,38,31,2F,30,39,03,erF, 
38,38,31,2F,30,39,37,2F, 
36,38,38,2F,38,38,1F,1D, 
1E,3C,1F,1D,1E,3C,33,1D, 
32,38,1F,1D,1E,3C,04,1D, 
38,3C,1F,1D,1E,3C,10,1D, 
34,3C,1F,1D,1E,38,13,11, 
38,34,13,11,14,38,1A,11, 
15,38,13,11,14,34,08,11, 
38,3A,38,11,14,3A,0E,11, 
38,3A,38,11,14,3A,12,2B, 
38,3B,12,2B,18,3B,19,28B, 
21,38,12,2B,18,3B,05,28, 
38,38,38,28,18,3B,2D,28B, 
38,3B,38,2B,18,3B,00,07, 
00,08,00,03,03,03,00,04, 
01,00,00,02,02,02,0B,08, 
00,07,00,09,09,83,00,06, 
00,056,00,05,05,05,02,07, 
00,07,03,03,03,03,00,04, 
01,00,02,02,02,02,08,08, 
00,08,00,09,09,09,00,06, 
00,06,00,05,05,05,20,07, 


4C,4E,15,41,44,43,41,4E, 
44,41,53,4C,42,43,43,42, 
43,53,42,45,51,42,49,54, 
42,4D,49,42,4E,45,42,50, 
4C,42,52,4B,42,56,43,42, 
56,53,43,4C,43,43,4C,44, 
43,4C,49,43,4C,55,43,4D, 
50,43,50,58,43,50,59,44, 
45,43, 44,45,58,44,45,593, 
45,4F,52,49,4E,43,49,4E, 
58,49, 4E,59,4A,4D,50,4A, 
53,52,4C,44,41,40,44,58, 
4C,44,59,40,53,52,4E,4F, 
50,4F,52,41,50,48,41,50, 
48,590,50,4C,41,50,4C,50, 
S52,4F,4C,52,4F,52,52,54, 
49,52,54,53,53,42,43,53, 
45,43,53,45,44,53,45,439, 
53,54,41,53,54,58,53,54, 
59,54,41,58,54,41,59,54, 
53,58,54,58,41,54,58,53, 
54,59,41,3F,3F,3F,41,4l, 
58,44,43,50,49,53,43,4C, 
41,58,52,4C,41,52,52,41, 
53,4C,4F,53,52,45,0A,22, 
38,3F,38,22,02,3F ‚24,22, 
02,38,38,22,02,3F,03,22, 


172 RUM Sonderheft 2 


WAVE RDNELOMEJTERWORL.D COM 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


FOR A-8192 TO 15592 STEP 


00,27,00,03,03,03,00,04, 
01,00,02,02,02,02,0B,08, 
08,00,00,03,09,03,00,06, 
02,06,00,05,05,05,00,07, 
002,07,00,03,03,03,00,04, 
01,00,0C,02,02,02,0B,08, 
00,08,20,093,00,03,00,06, 
00,06,00,05,00,05,00,07, 
00.07,03,03,03,03,00,00, 
02,00,02,02,02,02,0B,08, 
02,00,09,09,0R,0A,00,06, 
22,00,00,05,00,00,04,07, 
04,07,03,03,03,03,00,04, 
00,00,02,02,02,02,0B,08, 
00,08,09,09,0R,0A,00,06, 
02,06,09,05,06,00,04,07, 
02,07,03,03,03,00,00,04, 
00,00,02,02,02,02,0B,08, 
00,08,00,09,03,09,00,06, 
02,06,00,05,05,05,04,07, 
02,07,03,03,03,03,00,04, 
00,00,02,02,02,02,08,08, 
02,08,00,03,09,03,00,06, 
00,06,00,05,05,05,00,00, 


8:5-8:C=-9:FOR B=® TO 7: 
GOSUB 699490 


E3 
84 
F3 
EF 
F3 
OE 
El 
EA 
FA 
83 
FA 
FB 
FA 
03 
F3 
21 
ES 
03 
E4 
F3 
F&6 
03 
EA 
F6 


4139 


3=5+H+L<C: 0=53 295575=255-5 
AND 255:POKE A+B,H+L:NEXT 
B:GOSUB 69948 
FS="PRUEFSUMME OK”: IF S<> 
H+L THEN FS="CRUS] 
PRUEFSUNMENFEHLER": F=F+1 
GOSUB 60099:NEXT A:PRINT ” 


5034 


5633 


2267 


EDOWNI”F"FEHLER”: END 
HS:G60SUB 69959: H=L* 8715 
16:H$=-MIDs CH$,2) 


READ 


L-ASC CHS+"X")-4B: IF L<®O 


DR L>22 THEN 60080 


IF L<18 THEN RETURN 
L=-L-7:1F L>S9 THEN RETURN 
FS=-"CRUSIEINGABEFEHLER":L=- 


®:F=F+1 
PRINT "ZEILE” PEEK (64)* 2726 
eS6+PEEK (63)FS: RETURN 


38,3F,38,22,02,3F,0D,ee, 
38,3F,38,22,02,3F,1C,01, 
38,3D0,06,01,27,30,26,01, 
27,38,06,01,27,30,07,01, 
38,30,38,01,27,30,2C,®1, 
38,30,38,01,27,3D0,29,17, 
38,40,38,17,20,40,23,17, 
20,38,1B,17,20,40,08,17, 
40,38,38,17,20,40,0F,17, 
38,40,38,17,20,40,2A,00, 
38,3E,38,00,28,3E,25,00, 
28,38,1B,00,28,3E,0C,00, 
38,3E,38,00,38,3E,2E,00, 
38,3E,38,00,38,3E,38,2F, 
38,39,31,2F,30,39,16,38, 
35,38,31,2F,30,39,03,2F, 
38,38,31,2F,30,39,37,orF, 
36,38,38,2F,38,38,1F,1D, 
1E,3C,1F,1D,1E,3C,33,1D, 
32,38,1F,1D,1E,3C,04,1D, 
38,3C,1F,1D,1E,3C,10,1D, 
34,3C,1F,1D,1E,38,13,11, 
38,34,13,11,14,38,1A,11, 
15,38,13,11,14,3A,08,11, 
38,34,38,11,14,3A,0E,11, 
38,30,38,11,14,3A,12,2B, 
38,3B,12,2B,18,3B,19,2B, 
21,38,12,2B,18,38,05,2B, 


3198 


1044 
1334 
246B 


Maschinensprache 


38,38,38,2B,18,3B,2D,2R, 1370 4C,37,A4,A9,6F,85,B9,20, 
38,38, 38,2B,18,3B,09,07, 1389 S6,FF,20,AS,FF,20,D2,FF, 
00,08,00,03,03,03,00,04, 1398 C9,00,D0,F6,20,AB,FF,A2, 
01,00,00,02,02,02,08,08, 1400 08,20,C9,FF,A9,01,20,D2, 
00,07,00,09,09,09,00,06, 1410 FF,A9,08,4C,D2,FF,57,.©C, 
00,06,00,05,05,05,02,97, 1420 50,2C,43,52,53,2E,84,48, 
00,07,03,03,03,03,00,04, 1430 A9,00,85,CC,20,3E,F1,F®, 
01,00,02,02,02,02,08,08, 1449 FB,C9,00,D9,00,68,AA,A4, 
00,08,00,09,09,09,00,06, 1450 D3,EB1,D1,30,FC,E6,CC,n9, 
00,06, 00,05,05,05,00,07, 1460 00,60,C9,3D,F0,1D,C9,1D, 
00,07,00,03,03,03,00,04, 1470 FO,2C,A8,68,AA,EO,04,FD, 
01,00,02,02,02,02,0B,08, 1480 D5,98,48,20,30,13,90,04, 
08,00,00,09,09,09,00,06, 1490 68,4C,6E,14,90,59,13,68, 
00,06,00,05,05,05,00,07, 1590 4C,D2,FF,6B,AA,Fo,BF,Ch, 
00,07,20,03,03,03,00,04, 1510 A4,D3,81,01,30,FC,A9,9D, 
01,00,0C,02,02,02,0B,08, 1520 29,D2,FF,4C,6E,14,68,RAn, 
00,08,00,09,00,09,00,06, 1530 EO,04,BO,AA,EB,A4,D3,B1, 
00,06,00,95,00,05,00,97, 1540 D1,30,FC,A9,1D,20,D2,FF, 
00,07,03,03,03,03,20,00, 1559 4C,6E,14,18,65,FB,85,FB, 
00,00,02,02,02,02,0B,08, 1569 390,02,E6,FC,AS,FC,CS,65, 
00,08,09,09,0R,0n,00,06, 1570 F0,04,B0,04,30,31,A5,FB, 
00,20,00,05,00,00,04,07, 1580 C5,64,F0,28,390,29,49,00, 
04,07,03,03,03,03,00,04, 1538 85, 0A,85,C6,20,C9,17,20, 
00,00,02,02,02,02,0B,98, 1699 6A,18,R2,05,ED,10,15,20, 
00,08,09,09,0A,0R,00,06, 15610 E2,19,CA,10,F7,20,F5,19, 
00,06,03,05,06,00,04,07, 1629 20,CC,FF,A9,08,4C,C3,FF, 
00,07,03,03,03,00,00,04, 1639 00,20,00,4E,45,2E,80,4C, 
00,29,02,02,02,02,0B,08, 1649 6E,15,20,F5,19,A2,0B,n®, 
00,08,20,09,03,09,00,085, 1659 1C,20,DE,12,A5,FB,8D,CC, 
00,26,20,05,25,05,04,07, 1669 12,80,06,12,80,08,12,#5, 
00,07,03,03,03,03,09,04, 16798 FC,8D,CD,12,80,07,12,8D, 
20,02,02,02,02,92,0B,28, 1688 D3,12,A2,0C,A0,1C,20,DE, 
20,08,00,03,093,09,20,86, 1698 12,A5,FB,8D,CE,12,A5,FC, 
20,06,90,05,05,05,1C,08, 17098 8D,CF,12,4C,53,15,20,e2, 
00,83,50,83,04,A0,00,AB, 1719 1C,B0,B2,20,E8,19,20,08, 
54,83,2B,09,00,93,00,rB, 1728 1A,BO,BF,20,FS,19,AE,DS, 
04,A0,01,15,83,01,BE,C7, 1738 12,20,0E,14,20,E8,19,2®, 
12,8C,C6,12,20,5E,13,#9, 1749 A7,17,A9,80,85,04,20,6A, 
03,85,39,A0,90,29,3E,F1, 1750 18,A0,00,Bi,FB,AA,ED,CE, 
20,3D0,13,939,59,13,C8,C9, 1760 11,D9,59,20,AB,15,A9,01, 
04,D08,F2,AE,C7,12,AC,C6, 177 4C,D3,14,A2,02,BD,R0,15S, 
12,20,5E,13,49,00,85,33, 1789 20,E2,19,CA,10,F7,20,r6, 
A2,00,20,6E,14,C9,0D,Fo, 1798 15,A9,24,20,E2,19,B1,FB, 
05,E8,E0,05,D8,F4,AD,SS, 1808 85,FF,20,FD,19,43C,D1,15, 
13,0A,0R,0A,0R,85,FC,AD, 1810 59,42,2E,29,AB,15,A9,20, 
5A,13,05,FC,85,FC,AD,SB, 1820 4E,E2,19,A0,80,Bl,FB,An, 
13,0R,0A,0A,0A,85,FB,AD, 1830 BD,C6,10,0A,18,7D,C6,10, 
5C,13,05,FB,85,FB,A9,00, 1840 AA,BD,03,10,C9,3F,F0,C3, 
85,C6,E6,CC,60,C9,30,30, 1859 20,E2,19,E8,BD,03,10,20, 
0C,C9,3A,30,0A,C9,41,30, 1860 E2,19,E8,BD,23,10,20,Eo, 
04,C93,47,90,07,38,60,38, 1870 19,A0,00,60,C9,01,00,0D, 
E9,30,18,60,38,E3,37,18, 1888 20,A3,15,A9,41,20,E2,19, 
60,00,08,020,00,00,18,4C, 1898 A9,01,4C,D3,14,C9,02,D0, 
FO,FF,38,4C,F@O,FF,AS,FE, 1908 1F,20,A3,15,20,A3,19,90, 
29,FD,4A,4A,4A,4A,AA,BD, 19190 12,A9,24,20,E2,19,C8,B1, 
9A,13,20,D2,FF,AS,FE,29, 1929 FB,85,FD,C8,B1,FB,85,FE, 
OF,AA,BD,SA,13,20,D2,;FF, 1938 20,61,18,A9,03,4C,D3,14, 
AS,FD,29,F0,4n,4A,4a,4A, 1349 C9,03,00,15,20,43,15,#9, 
AA,BD,3A,13,20,D2,FF,RAS, 1950 24,290,E2,19,C8,Bl,FB,85, 
FD,29,0F,AA,BD,SA,13,4C, 1960 FF,20,FD,19,A9,02,4C,03, 
D2,FF,30,31,32,33,34,35, 1979 14,C9,04,00,1A,20,03,15, 
36,37,38,39,41,42,43,44, 1989 A9,23,20,E2,19,A9,24,20, 
45,46,A5,FE,29,F0,4A,4A, 19339 E2,19,C8,B1,FB,85,FF,20, 
YA,4A,AA,BD,9A,13,20,D2, 2000 FD,19,A9,02,4C,D3,14,C9, 
FF,AS,FE,29,0F,AA,BD,Sn, 2010 05,00,29,20,A3,15,20,A3, 
13,20,D2,FF,AS,FD,29, Fo, 2020 19,90,12,A9,24,20,E2,19, 
Y4A,4Aa,4A,4n,AA,BD,3A,13, 2030 C8,81,FB,85,FD,C8,Bil,FB, 
"B0,D2,FF,AS,FD,29,0F,An, i 2040 85,FE,20,61,18,A9,2C,20, 
BD,SA,13,4C,D2e,FF,AS,FF, 2050 E2,19,49,58,20,E2,19,#9, 
29,F0,4A,4n,4A,4A,AA,BD, 2060 03,4C,D3,14,C9,06,00,29, 
9A,13,20,D2,FF,AS,FF,os, 2979 20,R3,15,20,A3,19,99,12, 
OF,AA,BD,9N,13,4C,D2,FF, 2080 A9,24,20,E2,19,C8,Bl,FB, 
00,00,00,00,00,20,00,00, 2050 85,FD,C8,Bl,FB,BS,FE,2®, 
00,20,00,00,00,00,00,00, 2100 61,18,A9,2C,20,E2,19,#9, 
00,00,900,00,00,08,A0,07, 2110 s3,20,E2,19,A9,03,4C,D3, 
B3,66,14,30,F8,13,E8,88, 2120 14,C9,07,00,29,20,n3,15, 
10,F6,BRA,A2,F8,A0,13,20, 2138 A9,28,20,E2,19,A9,24,20, 
ED,FF,A9,28,AA,AB,20,BaA, 2140 E2,19,C8,B1,FB,85,FF,co, 
FF,290,C0,FF,20,44,E5,A9, 2150 FD,19,A9,2C,20,E2,19,#9, 
08,85,BA,A2,00,86,99,20, 1 2160 58,20,E2,19,49,29,20,E2, 
B4,FF,AS,30,F0,05,r2,05, 2179 19,49,22,4C,D3,14,C9,08, 
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16C8 
16D8 
15D8 
16E® 
16E8 
16F® 
16F8 
1709 
1708 
1710 
1718 
1720 
1728 
1730 
1738 
1749 
1748 
1750 
1758 
1760 
1768 
1770 
1778 
1780 
1788 
1790 
1798 
17AB 
17A8 
17BO 
17B8 
17C0 
17C8 
17D0 
17D8 
17E® 
17E8 
17F® 
17F8 
1808 
1808 
1818 
1818 
1820 
1828 
1830 
1838 
1840 
1848 
1850 
1858 
1860 
1868 


174 sem 


2188 
2130 
22008 
2210 
2228 
2230 
2240 
2250 
2269 
2270 
2288 
2290 
2308 
2310 


320 


2330 
2340 
2358 
2360 
2378 
2388 
2330 
2400 
2410 
2420 
2439 
2449 
2459 
EHEO 
2470 
24808 
2430 
2522 
2518 
25209 
2538 
2549 
8558 
2569 
2570 
2588 
2530 
2600 
2619 
2620 
2539 
2549 
2650 
2562 
2678 
2688 
2690 
2708 
2710 
2729 
2738 
2748 
2750 

768 
2770 
27B8 
2798 
2800 
2819 
2829 
2830 
2840 
2858 
2860 
2870 
2880 
28339 
2909 
2310 
29329 
2330 
2340 
2350 
2968 
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D0,23,20,43,15,19,28,20, 
E2,19,49,24,20,E2,19,C8, 
Bl,FB,85,FF,28,FD,13,#9, 
23,20,E2,19,R9,2C,20,E2, 
19,49,59,20,E2,19,A9,02, 
4C,D3,14,C9,09,D0,1F,20, 
A3,19,A9,24,20,E2,19,C8, 
B1,FB,85,FF,20,FD,19,#8, 
2C,20,E2,19,49,58,20,Ee, 
19,A49,02,4C,D3,14,C9, OR, 
DO,1F,20,43,15,49,24,20, 
E2,19,C8,B1,FB,85,FF,20, 
FD,19,A9,2C,20,E2,13,#9, 
59,20,E2,19,R3,02,4C,D3, 
14,C09,08,D0,2E,20,#3,15, 
CB,B1,FB,65,FB,80,D0,12, 
AS,FC,59,00,80,D1,12,B1, 
FB,10,03,CE,D1,12,AD,Do, 
12,69,02,80,D0,12,90,03, 
EE,D1,12,20,52,18,49,02, 
4C,D3,14,20,03,15,n9,28, 
20,E2,19,20,43,19,30,12, 
AS,24,20,E2,19,C8,Bl,FB, 
85,FD,C8,B1,FB,85,FE,20, 
61,18,49,29,20,E2,19,#9, 
03,4C,D3,14,24,20,41,42, 
2E,80,00,02,08,01,00,53, 
4F,2E,80,20,01,08,01,r0, 
02,8C,D2,12,84,0A,A0,00, 
8C,D3,12,R2,12,BD,34,17, 
20,E2,19,Ch,10,F7,AS,FB, 
85,FD,AS,FC,85,FE,20,61, 
18,20,47,18,A0,01,A5,0R, 
FO,0A,BI,AC,C5S,FC,30,12, 
F0,09,B0,45,CB,Bl,AC,F®, 
40,00,07,88,B1,AC,C5,FB, 
B0,37,A0,02,R9,00,S1,rC, 
AS,AC,8S,02,A5,AD,85,03, 
20,6N,18,45,02,85,AC,R5, 
03,85,AD,n0,00,B1,AC,BD, 
D0,12,C8,B1,AC,8D,01,12, 
20,52,18,n0,05,B9,41,18, 
20,E2,19,88,18,F7,20,61, 
18,18,A5,AC,69,03,85,RC, 
AS,AD,63,00,85,AD,C5,4D, 
30,0C,F0,01,60,A5,AC,CS, 
3F,30,03,F0,01,68,4C,CC, 
17,24,20,45,44,2E,20,AD, 
CC,12,85,AC,AD,CD,12,85, 
AD,60,A9,4C,20,E2,19,AD, 
D2,12,85,FD,AD,D1,12,85, 
FE,20,F5,19,20,AA,13,4C, 
E8,19,18,AD,D2,12,69,01, 
8D,D2,12,930,03,EE,D3,12, 
AS,090,20,E2,19,49,01,20, 
E2,19,49,08,20,E2,19, RD, 
D2,12,20,E2,19,AD,D3,12, 
29,E2,19,R5,FC,C5,65,39, 
OC,F0,02,80,51,A5,FB,CS, 
54,F0,02,BO,F6,20,47,18, 
AD,00,B1,AC,CS,FB,Do,21, 
C8,Bl,AC,CS,FC,D0,1A,#3, 
00,CB,31,AC,88,B1,AC,8D, 
D1,12,88,B1,AC,8D,D00,12, 
20,52,18,20,n6,15,4C,FB, 
18,18,AS,AC,59,03,85,AC, 
90,02,E6,AD,AS,AD,C5,48, 
90,C6,F0,02,B0,08,5,rFC, 
C5,3F,30,BC,F@,BA,nS,on, 
30,01,50,09,80,20,E2,13, 
AD,D6,12,85,41,A0,D7,10, 
85,42,A5,42,CD,09,12,30, 
OR,FQ,01,60,A45,41,CD,D8, 
12,B0,F8,A0,00,B1,41,C5, 
FB,D0,07,C8,B1,41,C5,FE, 
FO,0E,18,A5,41,69,04,85, 
41,30,02,E6,42,4C,02,139, 
A2,02,BD,A9,15,20,E2,19, 
CA,10,F7,20,R6,15,A0,029, 


Sonderheft 2 
MEEOMPUTERWORED ZSM 


A3,24,20,E2,19,B1,FB,8S, 
FF,20,FD,19,C8,8C,DA,ıe, 
18,98,65,FB,8D,DB,12,#S, 
FC,69,00,80,0C,12,40,03, 
AD,DC,12,D1,41,90,1B,Fo, 
ED,AD,DB,12,85,FB,AD,DC, 
12,85,FC,4C,5A,18,88,AD, 
DB,12,D1,41,90,04,F0,02, 
BO,E7,AC,DA,12,C0,05,FB®, 
06,20,A5,15,4C,49,19,R0, 
00,AD,DB,12,931,41,B5,FB, 
C8B,AD,DC,12,91,41,85,FC, 
YC,6R,18,C8,B1,FB,85,BB, 
C8,B1,FB,85,BC,C5,62,30, 
2D,F0,02,50,06,45,BB,C5, 
61,90,23,A5,BC,C5,65,30, 
OC,F@,02,80,19,n5,BB,C5, 
64,F0,02,E0,11,45,BB,8D, 
D0,12,A5,BC,80,01,12,20, 
52,18,R0,00,18,60,n0,00, 
38,50,20,F5,19,20,D2,FF, 
78,48,AD,D4,12,00,08,n9, 
35,85,01,68,50,48,49,37, 
85,01,58,68,60,20,F5,19, 
29,DE,13,4C,E8,19,19,88, 
AD,C8,12,85,FB,85,61, AD, 
C3,12,85,FC,85,62,AD,Ca, 
12,85,64,AD,CB,12,85,65, 
AD,CC,12,85,AC,AD,CD,12, 
B5,AD,38,AD,CE,12,ES,AC, 
AB,AD,CF,12,E5,AD,D9,06, 
C0,23,B0,02,38,60,A0,00, 
Bl,FB,AA,BD,C6,11,F0,37, 
C93,01,F0,33,C3,02,F0,24, 
C3,03,F0,27,C9,04,F0,23, 
C3,95,F0,18,C9,06,F0,14, 
C3,07,F®0,17,C9,08,F0,13, 
C9,09,F@0,0F,C3,0A,FO,0B, 
C9,0B,F0,3E,20,AE,1B,#9, 
03,02,06,49,02,00,02,r8, 
01,18,65,FB,85,FB,30,02, 
ES,FC,A5,FC,C5,65,F9,17, 
90,1D,AS,AC,85,3F,AS,AD, 
85,40,20,E9,1F,A5,62,85, 
FC,AS,51,85,FB,18,560,#5, 
FB,C5,64,F0,02,B0,E3,4C, 
PR,1A,C8,18,B1,FB,65,FB, 
85,FD,nS,FC,69,00,85,FE, 
Bi,FB,10,02,C6,FE,18,A5, 
FD,563,02,85,FD,30,02,E6, 
FE,AO,00,A5,FD,31,AC,#AS, 
FE,C8,91,AC,AS,FF,CB,91, 
AC,18,AS,AC,63,03,85,AC, 
90,02,E8,AD,4C,7B,1A,AD, 
CC,12,85,AC,AD,CD,12,65, 
AD,18,R5,AC,69,03,85,87, 
AS,AD,69,20,85,B8,.n0,00, 
B1,AC,D1,B7,08,0E,C8,B1, 
AC,D1,E7,00,07,n9,00,31, 
B7,88,31,B7,18,#5,B7,68, 
03,85,87,30,02,E6,B8,#S, 
BS,C5,40,00,09,45,B7,C5, 
3F,D9,03,18,A5,AC,69,03, 
85,AC,30,02,E6,RD,AS,AD, 


A C5,40,00,BS,AS,AC,C5,3F, 


DO,AF,AD,CC,12,85,B7,RD, 
CD,12,85,88,n0,00,B1,B7, 
C8,11,B7,F0,23,18,45,B7, 
63,03,85,B7,45,88,59,00, 
85,5B8,C5,40,00,E5,45,B7, 
C5,3F,00,E0,38,A5,3F,ES, 
03,85,3F,B0,02,C6,40,60, 
38,A5,3F,E3,03,85,3F,B9, 
02,C6,40,45,40,C5,B8,D00, 
07,45,3F,C5,B7,D0,01,60, 
A®,01,B1,3F,88,11,3F,F®, 
DF,B1,3F,31,87,C8,B1,3F, 
91,E7,4C,5D,)JB,50,C8,B1 

F8,85,FD,CB,E1,FB,8S,FE, 


Maschinensprache 


1EB8 AS,FE,CS,62,390,37,F0,02, 
1BC9 B0O,06,#5,FD,C5,61,990,2D, 
1EC8 AS,FE,C5,;65,39,0C,F®,®o, 
1BD® B0,23,#5,FD,C5,54,F0,o2, 
1208 BO,1B,N2,00,A5S,FD,Sı,AC, 
1BEO C8,AS,FE,31,AC,CB,A9,FF, 
" 1BEB 91,AC,18,A5,AC,69,903,85, 
1BF® AC,30,02,ES,AD,60,18,#5, 
1BF8 AC,569,03,85,RC,30,02,E5, 
1C00 AD,68,20,44,E5,20,55,1D, 
1C08 AD,00,8B9,5D,1E,20,De,FF, 
1C10 £C8,C0,28,00,FS,20,60,1D, 
1C18 A®,09,89,85,1E,20,D2,FF, 
1C20 CB,C0,28,00,F5,20,60,1D, 
1C28 A®,00,B9,AD,1E,20,D2,FF, 
1C30 £8,C0,28,00,F5,29,55,1D, 
1C38 A9,05,80,45,1C,AS,1E,8D, 
1C49 46,1C0,A0,00,293,E8,1F,Fo, 
1C48 14,20,02,FF,18,AD,4S,1C, 
1C59 69,01,80,45,1C,30,ED,EE, 
1C58 46,1C,4C,44,1C,A2,08,A0, 
1C60 1C,28,DE,12,AS,FB,8D,C8, 
1C68 12,45, FC,80,C9,12,R2,03, 
1C70 -AB,1C,20,DE,12,AS,FB,8D, 
1C78 CaA,ı2,A5,FC,80,CB,12,R2, 
1C80 OB,A®,1C,20,DE,12,A5,FB, 
1CB8 8D0,CC,12,80,06,12,80,08, 
1C90 12,AS,FC,8D0,CD,12,80,07, 
1c38 12,80,D9,12,A2,0C,AD,ıC, 
1CAO 20,DE,12,A5,FB,80,CE,12, 
ICA8 AS,FC,8D,CF,12,A2,0E,AO, 
‚1CBO 19,20,F6,1D0,RD,F4,1D,C$, 
1CB8 4A,F0,08,49,01,80,04,12, 
1CC0 4C,C7,1C,n9,00,FO,F6,AD, 
1CCB DB,12,85,64,AD,D9,12,85, 
1CDO 65,A2,10,AD,On,20,F6,1D, 
1CD8 AD,F4,1D,C9,4A,D0,3B,R2, 
1CEO 12,AR,1C,20,DE,12,R0,00, 
1CE8 AS,FB,91,64,C8,A5,FC,31, 
ICF® 64,A2,13,AQ,ı1C,20,DE,12, 
1CFB AD,02,AS,FB,31,64,C8,9S, 
1000 FC,31,64,18,AD,D8,12,59, 
1008 04,8D,D8,12,80,CC,12,50, 
1010 06,EE,D9,12,EE,CD,ı2,4C, 
1018 C7,1C,A9,00,85,C6,20,74, 
1020 1D,8E,DS,12,A2,17,A0,17, 
1028 18,20,FO,FF,A3,AB,20,De, 
1039 FF,A9,30,20,D02,FF,A3,00, 
1038 85,CC,85,C06,45,C6,F0,FC, 
1040 A9,20,20,D2,FF,E6,CC,A9, 
1048 00,85,C6,R5,CB,C9,3F,D0, 
1D5® 02,38,60,18,60,AR0,27,#9, 
1058 PR,20,D2,FF,88,10,FA,60, 
1060 A9,2R,20,D2,FF,ADO,25,#9, 
1068 . 20,20,D2,FF,88,10,FA,A9, 
1079 2AR,4C,D2,FF,A2,15,nB,0n, 
1078 18,20,F0,FF,AS,00,85,53, 
1080 A2,00,20,8F,1D,C9,0D,Fo, 
1088 05,E8,E0,0F,D0,F4,60,49, 
1090 AQ,20,D2,FF,C6,D3,84A,48, 
1038 Ag, 00,85,CC,28,3E,F1,FD, 69000 
ıDRa9 FB,C9,00,D0,0E,68,An,Ag, 
1DAB 20,20,D2,FF,C6,D3,E6,CC, 
1DBO A9,00,60,C9,14,FB,22,RB, 82010 
1DB8 68,AA,E®,0E,F0,01,38,C3, 
1DC0 29,30,CC,C9,80,30,04,C9, 
10C8 ABO,30,C4H,30,F8,13,20,D2, \ Be2220 
1000 FF,AS,AQ,20,02,FF,C6,D3, | 
1008 60,6B,AA,F®,B2,CA,A9,28, 
1DE® 20,D2,FF,C6,D3,A9,14,20, 560032 
1DEB D2,FF,A9,ARB,20,D2,FF,C6, | 
1DF® D3,4C,8F,10,00,20,18,20, 
ıDFa FO,FF,AS,4A,8D,F4,1D,R2, 
1E00 00,86,39,86,CC,8E,F5,1D, 
1E08 C6,D3,20,3E,F1,F@,FB,Cs, 
1E1® eD,F0,26,C9,14,F0,32,RAE, 
1E18 FS,1D0,E®,01,F0,EC,C9,4n, 
1E29 F0,04,09,4E,DO,E4,EE,FS, 
1E2B 10,8D,F4,1D,20,D2,FF,#3, 
1E30 AD,20,D2,FF,C6,D03,4C,®a, 
1E38 1E,AD,F5,1D,D8,06,AD,F4, 


Listing 4: Kombinierter Hexdump-Basiclader des MES-Reassemblers 


WWW HSRELSONPUFTERWORLB. TOM 


1D,4C,D2,FF,A9,20,4C,De2, 
FF,AD,FS,1D,F®,BC,CE,FS, 
1D,A9,20,20,D2,FF,C6,D3, 
C6,03,4C,0A,ı1E,2A,20,4D, 
41,53,43,48,49,4E,45,4E, 
53,50,52,41,43,48,45,2D, 
45,4E,54,57,49,43,4B,4C, 
55,4E,47,53,2D,53,59,53, 
54,45,4D,20,2A,2n,20,20, 
20,52,45,41,53,53,45,4D, 
42,4C,45,52,20,36,34,20, 
55,31,20,20,20,50,52,4F, 
47,52,41,4D,4D,45,44,20, 
42,59,20,20,2A,2A,20,20, 
20,20,20,20,20,20,20,20, 
20,20, 4A,55,45,52,47,45, 
4E,29,48,41,4E,4B,20,20, 
20,20,20,20,20,20,20,20, 
20,20,20,20,2A,00,53,54, 
41,52,54,41,44,52,45,53, 
53,45,20,53,4F,55,52,43, 
45,54,45,58,54,20,3A,20, 
24,20, 30,38,39,30,00,45, 
4E,44,41,44,52,45,53,53, 
45,20,20,20,53,4F,55,52, 
43,45,54,45,58,54, 20,34, 
20,24,20,30,38,30,30,0D, 
00,53,54,41,52,54,41,44, 
52,45,53,53,45,20,4C,41, 
42,45,4C,53,20,20,20,20, 
20,3N,20,24,20,30,38,30, 
30,0D0,45,4E,44,41,44,52, 
45,53,53,45,20,20,29,4C, 
41,42,45,4C,53,20,20,20, 
20,20,3A,20,24,20,30,38B, 
30,30,0D0,0D,52,4F,4D,oF, 
4B,45,52,4E,41,4C,20,41, 
55,53,53,43,48,41,4C,54, 
45,4E,3F,20,4N,0D,0D,54, 
41,42,45,4C,4C,45,3F,20, 
4A,0D,00,53,54,41,52,54, 
41,44,52,45,53,53,45,20, 
54,41,42,45,4C,4C,45,20, 
20,20,20,34,20,24,20,30, 
38,30,30,0D,45,4E,44,41, 
44,52,45,53,53,45,20,20, 
20,54,41,42,45,4C,4C,45, 
20,20,20,20,3n,20,24,20, 
30,38, 30,30,00,00,46,49, 
4C,45,4E,41,4D,45,3A, 20, 
0D,00,5A,49,45,4C,44,49, 
53,4B,45,54,54,45,20,45, 
49,4E,40,45,47,45,4E,2E, 
e0,AD,CC,12,C5,3F,D0,08, 
AD,CD,12,C5,40,D0,01,60, 
4C,EF,1A,4C,45,4E,41,4D, 


FOR A-4036 TO 8184 STEP B: 
S=8:C=-0:FOR B=-9 TO 7:G60SUB 
60049 
S-S+H+L-C:C=5>255:5=255-5S 
AND 255:POKE A+B,H+L:NEXT 
B:GOSUB 600949 
FS="PRUEFSUMME DK”: IF S<> 
H+L THEN FS="CRUS) 
PRUEFSUMMENFEHLER”: F=F+1 
GOSUB' 60999: NEXT A: PRINT. ” 
EDOWNI”F"FEHLER" END 
READ’HS:GOSUB 690859:H=L* 
16:H$=MID$ CHS,2) 
L=ASECHSH"XYI-4B:IFELSO 
CR L>22 THEN: 69988 

IF-L<18 -THEN' RETURN 
L-L-7:1E-L>9. THEN RETURN 
FS=-"ERUSIEINGABEFEHLER”:L= 
@:F=F+1 

PRINT "ZEILE? PEEK 164)* 
ESE+PEEK (ESIF$S: RETURN 


>» 


Sonderheft 2 Um 175 


20,08,0N,00,3E,20,32,35, 
30,33,3A,BF,20,4D,41,45, 
AB,B1,4D,45,53,20,55,4D, 
57,AF,3C,55,4E,47,00,00, 
00,29,C3,03,8E,01,CF,85C, 
02,CF,18,15,02,69,D4,85, 
D2,A®,ıF,A9,0E,31,D1,88, 
10,FB,38,45,D2,E9,D4,85, 
D2,20,5F,09,A2,00,20,50, 
08,C9,03,F0,00,C3,0D,F®, 
OF,E8,E0,10,30,F0,A2,10, 
DO,EC,20,4E,09,68,58,50, 
AE,01,CF,AC,02,CF,20,EBF, 
89,09,03,85,39,85,D0,r2, 
00,20,32,E6,30,82,03,E8, 
EO,19,00,F5,A9,00,85,383, 
85,D0,CA,BD,82,09,C9,20, 
FO,F8,E8,60,84,48,A5,C6, 
FO,FC,20,B4,ES,C9,03,F0, 
2C,C3,0D,00,0C,68,AA,20, 
4E,09,49,00,60,68,49,03, 
60,C3,14,F0,2D0,C3,94,F®, 
3A,C9,90,F0,73,C9,1D,D0, 
03,4C,39,09,R8,68,AA,ED®, 
10,00,04,A2,10,00,C5,38, 
C9,20,30,C0,C9,80,30,04, 
C9,A0,30,88,20,D2,FF,4C, 
SF,09,68,AA,D0,04,R2,00, 
FO,AA,CA,A9,14,20,02,FF, 
4C,80,08,A8,1D,B1,D1,C8, 
20,00,30,20,4E,09,18,A5, 
D3,59,0F,A8,B1,D1,C8,31, 
D1,18,45,D2,69,04,85,D2, 
A9,0E,31,01,38,45,D2,E3, 
D4,85,02,88,88,C4,D3,10, 
E3,A9,64,C8,31,01,68,An, 
4C,80,08,68\,AA,4C,80,08, 
6B,An,FO,B2,20,4E,09,C6, 
D3,20,5F,09,CA,4C,80,08, 
68,AA,E®,10,00,03,4C,C4, 
08,20,4E,09,E6,03,20,5F, 
03,E8,4C,80,08,A4,D3,B1, 
D1,C9,64,F0,05,29,7F,4C, 
69,09,49,20,00,F3,A4,D3, 
B1,01,C9,20,F0,17,09,80, 
91,D1,18,AS,D2,69,D4,85, 
D2,A9,0E,31,01,38,AS,D2, 
E9S,D4,85,02,60,A9,64,D0, 
E7,00,00,00,00,00,00,00, 
00,00,00,00,00,00,00,00, 
00,00,00,00,00,57,2C,50, 
2C,43,52,53,2E,52,2C,50, 
2C,4D,41,45,2D,46,49,4C, 
45,4E,41,4D,45,3A,20,0D, 
4D,45,53,2D,46,49,4C,45, 
4E,41,4D,45,3A,20,18,4C, 
FO,FF,38,4C,F0,FF,20,44, 


ES,A2,05,A0,00,20,BF,29,. 


A0,00,89,n2,09,28,D2,FF, 
C8,C0,0E,D0,FS,20,22,08, 
E0O,00,F0,E5,%0,03,89,3E, 
09,90,82,09,E8,88,10,F6, 
BA,n2,82,n0,09,20,BD,FF, 
A9,0B,AA,AB,20,BA,FF,20, 
CO,FF,A2,08,20,C6,FF,20, 
CF,FF,20,CF,FF,85,F7,20, 
CF,FF,85,F8,20,CF,FF,85, 
F9,20,CF,FF,85,FA,38,#5, 
F9,ES,F7,85,03,A5,FA,ES, 
F8,85,04,18,49,20,65,03, 
85,F9,A9,10,65,04,85, FR, 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


A9,00,85,FB,A9,10-85,FC, 
20,CF,FF,A®,00,20,CF,FF, 
91,FB,E6,FB,D0,02,E6,FC, 
AS,FB,C5,F9,D9,ED,AS,FC, 
CS,FA,D0,E7,20,CF,FF,RD, 
00,31,FB,20,CC,FF,A9,08, 
20,C3,FF,A2,06,A0,00,020, 
BEF,09,AR0,00,B3,B0,09,20, 
D2,FF,C8,C0,0F,D®,FS,20, 
22,08,E0,00,F0,ES,E0,0C, 
90,02,R2,0C,A0,07,839,36, 
09,3D0,82,09,E8,88,10,F6, 
BA,A2,82,R0,09,20,ED,FF, 
A3,08,AA,AB,20,BA,FF,20, 
CO,FF,A2,08,20,C3,FF,20, 
EB,0A,20,CC,FF,A9,08,4C, 
C3,FF,A9,01,20,D2,FF,#9, 
08,20,D2,FF,A9,00,85,F8, 
A9,10,85,FC,A0,00,84, FD, 
84, FE,B1,FB,29,0F,FO,OR, 
Ar,E6,FD,D0,02,E6,FE,Ch, 
DO,F7,Bl,FB,29,F0,F0,13, 
ya,4A,4A,4A,AA,18,AS,FD, 
69,04,85,FD,90,02,E6,FE, 
CA,DO,F2,C8,Bi1,FB,29,0F, 
FO,OF,AN,18,AS,FD,69,64, 
85,FD,90,02,E6,FE,CA,D2, 
F2,Bl,FB,29,F0,F0,15,4A, 
yA,4A,4A,AA,1B,AS,FD,63, 
E8,85,FD,AS,FE,69,03,85, 
FE,CA,D®O,F®,A9,01,20,D2, 
FF,A9,08,20,D2,FF,AS,FD, 
20,D2,FF,AS,FE,20,D2,FF, 
A9,00,85,02,R0,02,El,FB, 
C9,20,09,05,A9,80,4C,87, 
08,B1,FB,85,FF,10,04,C9, 
ADd,F0,36,29,7F,85,FF,E6, 
02,AS,FF,C9,27,00,04,A9, 
22,00,1B,C9,41,90,17,C9, 
5B,30,0B,C3,61,30,0F,C9, 
7B,30,08,4C,87,0B,09,80, 
40,87,0B,38,E9,20,20,D2, 
FF,A5,02,00,04,C8,4C,52, 
0B,C8,18,398,65,FB,85,FB, 
90,02,E6,FC,A5S,FB,CS,F3, 
D®O,11,A5,FC,CS,FA,D®,0B, 
A9,00,20,D2,FF,20,D2,FF, 
4C,D2,FF,A9,00,20,D2,FF, 
4C,CD,0N,00,00,00,00,00, 


FER A=20439 TO 3908 STEP 8: 
S-0:C=®: FOR E=8 TO. 7:605UB 


89040 


S-StH+L-E:6#57255:5*25555 
AND 255:POKE A+BE,H+L:NEXT 


B:G0OSUB 69249 
FE=ZPRUEFSUNME OK” -IE SC 
H+LTHEN FS="ERUS]I 
PRUEFSUNNENFEHLER":F=-F+l1 
GDSUE 62098:NEXT A:PRINT 
EDOWNI"F”FEHLER”:END 
READ HS: G0SUB ‚60859: H=L* 
16:H5-NIDE CHE,2) 

L=-ASE CHE-"X”)-48: IF LCD 
DR L>22 THEN 60080 

IF L<10,. THEN RETURN 
L=L-7 IE E39 THEN RETURN 


“ 


FS="ERUSIETNGABEFEHLER":L= 


8:F=F+1 
PRINT "ZEILE" BEER (B4)* 
EeSE+PEEK CE3IFS: RETURN 


3347 


5034 


Listing 5: Kombinierter Hexdump-Basiclader des Konverters 
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Dem C64-Nachfolger wurde das 
komfortable BASIC 7.0 mit vielen 
neuen Befehlen mitgegeben. Al- 
lerdings werden Basic-Program- 
mierer eine FIND-Funktion ver- 
missen, mit der man sowohl nach 
Basic-Kommandos als auch nach 
beliebigen Textstrings oder nach 
einer Kombination aus beiden su- 
chen kann. Ein kurzes Maschinen- 
programm schließt die Lücke. 


Zeilenbereich angeben 


Das neue Kommando FIND wird 
mit SYS 4864 (= $1300) aktiviert 
und kann (sinnvoll) nur im Direkt- 
modus verwendet werden. Die In- 
itialisierung mit SYS braucht nach 
dem Einschalten oder nach einem 
Reset nur einmal vorgenommen zu 
werden. Dann ist FIND bis zu ei- 
nem Reset immer im Direktmodus 
aufrufbar. Die Syntax entspricht 
genau dem List-Befehl: 

FIND (ohne Zusatz) durchsucht 
das ganze Basicprogramm. 

FIND -2300 sucht von Programm- 
beginn bis Zeile 2300. 

FIND 1740- sucht von Zeile 1740 
bis Programmende. 


Findiges 
Basic 


Satte 140 Befehle 
kennt der C128, 
darunter auch viele 
Toolkit-Kommandos. 
Eins fehlte bisher: 
der FIND-Befehl. 


FIND 740-9550 sucht von Zeile 740 
bis Zeile 9550. 

FIND 600 durchsucht nur die Zeile 
600. 

Wird die höchste erlaubte Zeilen- 
nummer (63999) überschritten 
oder werden außer Zeilennum- 
mern noch andere Zusätze einge- 
geben, erscheint eine Fehlermel- 
dung. Ist der FIND-Befehl richtig 
eingegeben, wird in der folgen- 
den Zeile die Aufforderung aus- 
gegeben: 

SUCHTEXT EINGEBEN: 

Der Suchtext kann eine beliebige 
Mischung aus Basic-Kommandos, 
Variablen und Textstrings sein, 


wobei beim C128 die Anzahl der 
eingegebenen Zeichen maximal 
160 betragen darf. Abkürzungen 
von Basic-Befehlen sind erlaubt. 


Suche nach Token 


Zum Beispiel kann nach dem 
PRINT-Befehl mit PRINT oder ? 
gesucht werden. Wenn gesuchte 
Textstrings mit Basic-Befehlen 
verwechselt werden können, müs- 
sen sie mit Anführungsstrichen 
eingegeben werden: Bei Eingabe 
von PRINTER wird nach PRIN- 
T"ER“ gesucht. Man muß hier also 
"PRINTER" eintippen. 

Die Initialisierung des FIND-Be- 
fehls wird durch ein Verstellen 
des Fehler-Zeigers in $0300 auf 
das FIND-Programm erreicht. Das 
Kommando FIND wird vom Basic- 
Interpreter zunächst als Fehler er- 
kannt und über den verstellten 
Fehler-Zeiger von FIND ausge- 
wertet. Das  Unterprogramm 
ADRIN liest den Zeilenbereich 
ein. Anschließend holt TXTEIN 
den Suchtext, TOKEN wandelt Ba- 
sic-Befehle in Basic-Token um, 
und bei ANFUE werden alle 


Listing 1: Hexdump von FIND 
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Anführungsstriche herausgenom- 
men. Da das Programm FIND für 
das Betriebssystem in der Spei- 
cherbank 15 abläuft, können die 
Basic-Programmzeilen aus der 
Bank 0 nicht einfach mit dem indi- 
zierten Befehl LDA (ZEIG]), Y ge- 
lesen werden. Das Betriebssy- 
stem stellt hierfür das Unterpro- 
gramm LBANKO zur Verfügung. 


Eingabe mit Monitor 


Bei ZEIVER wird die aktuelle Zei- 
lennummer mit der eingegebenen 
Endnummer verglichen. Ab 
VORN werden Basic-Text und 
Suchtext miteinander verglichen, 


tummm FIND cı28 6.1.86 „=. 


4808 BIELEFELD 18 
TEL. ı 085206-8895 


BUFZEI 
LANG 
LAENGE =4FB 
ZEIG® =t16 
ZEIGI „51 
ZEIG2 =sFrc 
BUFFER „0208 
FEHZEI =s0308 
TOKEN =$436D 
FEHPRG =2403F 
LIST =150E5 
TXTEIN =#4F93 
TATAUS =13281 
CHRGET =+0388 
CHROUT w3S556C 
ADRIN w1S5EFB 
LEANK® =#42EC 
4n51300 

.0BIM 


=12D 
=sFA 


jenzumnssmnuuusuuunzeneesununseuunnn 

j) AKTIVIERUNG DES FIND-BEFEHLS 

, MIT SYS48654 (= 513060) 

Isssuszuosseoomsenenunesmunmememnmnnn 

INIT LODA #<FIND 
STA FEHZEI 
LDA #>FIND 
STA FEHZEI+1 
JSR TXTAUS 

jeemmoemensesunssuszuzouumounmunnsenmomn 


TEXTI 


RTS ==> BASIC 


jeozmomeaunssens 


FNDTXT «BYT’FIHND” 


ıZEIGER EINGABESPEICHER 
sZAEHLER FUER TEXT 
»LAENGE DES SUCHTEXT 
‚AKTUELLE ZEILEN-NR. 
»ZEIGER AUF BASIC-TEXT 
»END-ZEILEN-NR. 
s»EINGABESPEICHER 
IıZEIGER FEHLER-PROGR. 
+TEXT==>BRSIC-TOKEN 
sFEHLER-PROOR. 
»BASIC-ZEILE LISTEN 
»TEXTEINGABE-PROGR. 
TEXT AUSGEBEN 
ZEICHEN VON BUFFER 
»ZEICHEN AUSGEBEN 
ADRESSEN EINLESEN 
»ZEICHEN AUS BANK & 


c128 


wobei Anführungsstriche überle- 
sen werden. Mit jedem gefunde- 
nen Zeichen wird der Zähler LANG 
dekrementiert und bei. Ungleich- 
heit wieder auf den in LAENGE 
gespeicherten Anfangswert ge- 
setzt. Erst wenn LANG den Wert 0 
hat, ist der ganze Suchtext gefun- 
den. Dann listet das Unterpro- 
gramm LIST genau eine Zeile. Da 
LIST zwei Carriage Return aus- 
gibt, wird einer mit Cursor. Up auf- 
gehoben. Wird in ZEIEND das 
Ende des Basic-Programms fest- 
gestellt, kehrt FIND über das Feh- 
lerprogramm mit READY in die In- 
terpreterschleife zurück. Sonst 
geht die Suche mit der nächsten 
Basic-Zeile bei ZEIVER weiter. 


Listing 1 ist der Hexdump der FIND- 
Routine. Er kann mit dem Monitor 
des: C128 eingegeben werden. 
Mit BOOT "NAME" wird der neue 
Befehl geladen und gestartet. 
(Peter Falke) 


Entdecker und 
Erfinder melden! 


Wer kennt den C128? Gesucht 
sind originelle Programme, die 
das Basic 7.0 ausreizen. As- 


semblerlistings sind ebenfalls 
willkommen. Also: Textverar- 
beitung, Tabellenkalkulation, 
Tool. Was immer den großen 
Speicher sinnvoll nutzt, ist von 
Interesse. 


TXTEIN 


“ BUFZEI 
TOKEN 

ı msFF 
“o 


FERTIG 


ABSPEI 


ZEIGO+1 
ZEIG2+1 


FEHLERZEIGER AUF 


;FIND-ROUTINE VERSTELLEN 
»TEXTI AUSGEBEN 


.BYT’FIND BEFEHL IST AKTIVIERT!” 6 


»SUCHTEXT EINGEBEN 


+ZEIGER EINGABESPEICHER 
»SUCHTEXT ==> BASIC-TOKEN 


BUFFER.X 
FERTIG 

u" 

ANFUE 
<BUFZEID,Y 


‚AUS BUFFER 
»c"> ELIMINIEREN 


ANFUE 
<BUFZEID,Y 
LAENGE 
ZEIGe 
ZEIO2 
ZEIGO+1 
ZEIG2+1 


»END-ZEILEN-NR. 
==> ZEIGER 2 


sNEUE ZEILEN-HR. 
sm=> ZEIGER @ 


AKTUELLE ZEILEN-NR. MIT 
ENDZEILEN-NR. VERGLEICHEN 


»BEI GLEICHHEIT L-BYTE TESTEN 


»GROESSER ALS ENDIZEILEN-NR, 


sZAEHLER GEFUNDENE ZEICHEN 


»TEXT NICHT GEFUNDEN 


»c") UEBERLESEN 


JNOCH KEIN ZEICHEN GEFUNDEN 


NOCHMAL VON VORNE SUCHEN 


jerzmmmunsuuueeoesenenunnnummuuenen 
GLEICH INx 
DET LANG 


BNE WEITER 
LDA BUFFER,Y JSR LIST 


CMP FNOTXT,Y JEINGABE = FIND-BEFEHL? LDR #851 

BEGQ FINDOK ISR CHROUT 
MP FEHPROG JMP ZEIVER 
JS SSSZZSCCZZZEZ—|azzo ze eng onsunsun 


FINDOK 


jsze=m=memeenmsnmuumocomeomennnununuen 


BEI GLEICHHEIT EINES ZEICHEN 
VERß SUCHTEXT GEFUNDEN BEI LANG=® 


VERGL 


LOY #3 


»CURSUR UP 
FEHLER 


jeemensnsszezreonsusuumoconseennuuuum 
ZEIEND LDY #8 


VERGL JSR LBANKO 


“3 

BUFZEI 
<BUFZEID,Y 
CHRGET 


LBANKO 
. ZEIGI 
ZEIGI+1 


»’FIND’ IM BUFFER ZERSTOEREN 
+1.ZEICHEN NACH "FIHD” HOLEN 
RDRIN »ZEILEN-NR. ANF.-ENDE HOLEN ZEIVER 
ADROK TXTAUS >TEXT2 AUSGEBEN PRGEND LDX #sFF 
jes=smemsenmmmsunsmeooooooomemooone JMP FEHPRG 


TEXT2 „BYT’SUCHTEXT EINGEBEN:” 8 


»NEUE ZEILENANFANGS- 
‚ADRESSE==>ZEIGER 1 
sNAECHSTE ZEILE 


GETADR 


==> READY 


jesmssseseeomoocoemesmsuoeommeoemunne 


Listing 2: Assemblerlisting zum FIND-Befehl 
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DELA-ELEKTRONIK GmbH 


Achtung! Neue Anschrift und Telefonnummer. 
5000 Köln 1 Maastrichter Straße 23 = 0221-51 7081 


Ladenöffnungszeiten: Mo-Fr 10.00 Uhr Sa 10.00-14.00 Uhr 


SUPEREPROMKARTE 256K 

Mehr Speicherkapazität als eine Diskette! Eine echte Alternative zum 
zweiten Diskettenlautwerk! Sie können auf der 256K—Epromkarte 
eine Directory anlegen und die Programme aus dieser heraus direkt 
stärlen. Ein in der Steuerung eingebauter Modulgenerator macht alle 
Programme für die Karte laulfertig. sodaß der Anwender keine Spe- 
zialkenntnisse benötigt 

Preis incl.Steuereprom 129,—DM 
Technische Daten: 8 Steckplätze fur 2764.27128.27256. Mitgeliefertes 
Steuereprom aufseperatem Sockel Betrieb am Expansionsport. Keine 
Eingriffe in den Rechner nötig! Ab sofort mil Präzisionssockeln 
ausgestältel 


Achtung! NEU Achtung! 
64K—Epromkarte: Unsere Kleine mit der Leistung der Großen 
Epromkarte für 2x32K mit Directorytunklion. Modulgenerator wie 
256K—Karte. Lieferung in formschönem Moduigehäuse 
64K-Epromkarte 49,50DM 


DELA—Epromkarten: 

Epromkarte 2.1 14,—DM 
Leerplatine 2.1 9,-DM 
für 2 Eproms 2716—2764 (oder 1x271281 Voll bestückt mil Präzısions 
sockeln. Ein—/Ausschalter. Umschalter, Resettaster 
Universalkarte 4.1 29,—DM 
Leerplatine 11,—DM 
Für 2x2764 oder 2x27128. Betriebsarı als Eoromkarte für 4 Modul- 
blöcke (8K) oder für 4 Betriebssysteme. Mit dieser Karte können Sie 
ihre neuen Betriebssysteme am Modulporl ohne Eingriff ın den Rech- 
ner betreiben! 


Modulkarte DELA—MO 8,90DM 
Diese Karte wird als Leerplatine für ein Eprom (2732—27 1281 angebo- 
ten. Es sind je nach Bestückung 5 Betriebsarten moglich 8/16K 
Epromkarle mil elektronischer Abschaltung 8/16K Epromkarte mıt 
elektr Ein-und Ausschaltung. Externes Betriebssystem am 


Expansionsport 
Passendes Modulgehäuse 4.500M 


DELA—Betriebssystemkarten 
5-fach Betriebssystemkarte 5/1 
Für vier zusätzliche Betriebssysteme auf 
Absturzfreii 

ohne Schalter 

mit Schalter 

Leerplatine 
Zweifach-Umschaltkarte 2/1 


Für ein zusätzliches Belriebssysiem aut 2764 
Absturzfreil ohne Schalter 


30,-DM 
Leerplatine 


10,-DM 
1-4fach Betriebssystemkarte, 
Für 1x2764-27256. Verwenöbar für SX64. 1541.MPS802 usw 


Leerplatine 5.-DM 


Fertig mit Schalter 39,-DM 
Einbau der Umschaltkarten in den Sockel des Originalroms! 


16K-Eproms 


35,-DM 
45,-DM 
12,-DM 


zwei 


Achtung! NEU! Achtung! 
3-fach Betriebssystemumschaltkarte 
für C128 
Bauen Sie Ihre O64-Betriebssysteme auch ın den 0128 eın. Aul dieser 
Karte ist Platz für eın 27266 mil drei Betriebssystemen ım bier-Mode 
Keine Platzprobleme. da die Karte kaum größer als das Egg" bm 
Mit Schalter - 
Leerplatine 6,-DM 


DELA-Eprommer II 
Der Eprommer II erfüllt alle Anforderungen die an einen 
Heimcompuler-Eprommer gestellt werden. Die Software stellt neden 
den normalen Programmıerfunktionen alle erdenklichen Hilfen beim 
Programmieren Ihrer Programme auf Eproms zur Verfügung Der ein- 
nouaıe Modulgenerator ist in der Lage Iln verbindung mit 1541/71) 
ast jedes Programm in ein Modulprogramm umzuwandeln Er bietet 
die Möglichkeit. mehrere Programme auf ein Eprom zu bringen. Das 
Startmenü hierzu können Sıe ireı defimeren Technische Daten 
Eproms 2716-27256, 27CXXX-Eproms. pinkompatıble EEprom 
Programmierspannungen 12,5, 21V. 25V ‚Schnell- und Langsampro- 
grammierung möglich „Auslesen und Verily von Eproms. Kopıerfunk- 
tion. Einzelbyteprogrammierüng. löschen von EEproms. eingebauter 
Monitor. alle Funktionen Softwaregesteuert. verschleißfreier Textool- 
sockel. Software auf Diskette 
Betrieb am User-Port. Kein ext. Netzteil erforderlich 

Eproms programmieren jetzt Kinderleicht! 


Eprommer II inc! Software 49,-DM 


DELA-Eprommer I: unse: vewährtes Modell brennt 2716-27128 
127256 nach Umbaui VPP 25V und 21V. WieEprommer Il außer: Modul- 
generator. Epromverify. Löschen EEproms 
Restposten 

Fertiggerät m.Textoolsockel 

nur solange Vorral reicht 


16K-RAM-Modul 79,-DM 
Eine Sott-Epromkarte fur den Modulentwickler. Das RAM kann normal 
beschrieben werden. Die Funktion enispricht der einer Epromkarte für 
8/16K oder Betriebssystem. Ein Anschluß für Batterie oder ACCU ıst 
vorgesehen 

MODULE mit Gehäuse 

S/4-Modul mit Turbo-Disk. Turbo-Tape. 005 5.1 
OLD nur 


94,-DM 


25,-DM 
Profi-Betriebssystem 30,-DM 
7x schneller laden DOS auf F-Tasten. wıele Sonderfunktionen mit 
CTAL-Tasten (Ahnlich Hypra-Loadı. Steckmodul für Expansionsport 

DELA-Modulgenerator 

Der Moduigenerator des Eprommer Il als Steckmodul. So können Sie 
die Vorteile des Generalors auch lur Ihren alten Eprommer nutzen 


Steckmodul 25,-DM 
IC-Tester 134,-DM 
Der IC-Taster testet alle TTL-ICs bis 20 Pıns auf korrekte Funktionen 
Ein Erkennen von unbekannten tabgeschliffenent IC ıst möglich. da 
der Tester die Typen selbst erkennt Uber die Dauertestiunktion kön 
nen auch IC-Fenler festgestellt werden. die nur zeitweise auftreten 
Eine sinnvolle Ergänzung Ihrer Elektronıkwerkstatt. Der Tester ıst mıt 
eınem 20-poligem Textoolsockel bestückt Software aut Diskette 


Betrieb am Modulport 
Eprom-Löschgerät 115,-DM 
43,50DM 


Köompleit mit Gehäuse mit Timer. Nur 1 Min Löschzeit 
Löschset 

Seibstbauset mil 220V-UV-Rohre Vorschaltgerät. Fassungen usw. für 
220V-Betrieb. Ohne Gehäuse 

Steckplatzerweiterung 99,-DM 
Bausatz nur 69,-DM 
Fur 4 Steckmodule. Auf dieser Steckplatzerwe,terung laufen last alle 
Module ohne sıch gegenseitig zu stören. Alle wicrügen Signale wer- 


den elektonisch geschaltet Umschaltung uber Tıpptaster LED 
Anzeige 


Adapter/Stecker 
3tach Userporladanter m Resel-Taster 
Userporladapier Leerplatine 
Wıinkeladapterplälne 
Experimentierplatine für Userport/ Modulport 
Userporisteckei 
Gehäuse hierlur 
Modulportstecker 
Userport-Resetlaster Idurchgeschieift 
Modulgehause 


DELA-Lightpen Lichtgrilfei mit guter Auflösung für alle Malpro- 
gramme mıt Lightpenfunktion geeignei 

Lightpen komplett 37,90DM 
Bausatz 19,90DM 


Steuern und Regeln mıı 64 Steuerungssystem für C64/C128 
Ideal tur Eisenbahn. Lichtelfekt. Alarmanlagen usw. Bis 15 Module 
können am Userpori adressiert werden. Leichte Programmierung uder 
unser Kilfsmodul oder ın Basıc Alle Karten des Systems sınd mıt 
Schraubanschlussen versehen. Auf jeder Karte ıst dıe Adresse mit 
DIL-Schalter einzustellen Jede Karte ist auch einzein am Userport zu 
betreiben Das System besteht aus. Relaiskarte mit 8 Relais 9.-OM 8 
Relais mıl je IxUM 
Digitaleingabekarte 49,-DM 
3 Kanäle mıl je 8 Bit TTL-Eingänge 
49,-DM 
5.90DM 


30.-DM 
18.-DM 
9.90DM 
12,-DM 
5,-DM 
4.-DM 
8.-DM 
13.90DM 
4,50DM 


Digitalausgabekarte 
3 Kanäle mit je 8 Bin TTL-Ausgänge 
Verbindungskabel tur zwei Karten 


Unsere Kombi-Pack's 
Kombi-Pack I 
Eprommer |. Epromkarte 2.1. Modulgenerator 


Kombi-Pack Il 
Eprommer Il, 64k-Epromkarte 


Kombi-Pack Ill 
Eprommer Il, Superepromkarte 256k 


135,-DM 
189,-DM 
249,-DM 


Rechner und Zubehör: 
Commodore C128 
Disk-Laufwerk 1571 

Atari 120 ST- 

Atari 520 ST- 


Verbindungskabel Userport-Centronics 
Joystick-Adapter für C-16 
Cassettenport-Adapter 1. C-16 
Reinigungs-Set f. 5.25 Laufwerke 
Citizen-Drucker 120D 

Star-Drucker SG10 

Cassettenrecorder f. C-64/128 

Hitrans 300 Akustik-Koppler m. FTZ.-Nr. 
inkl. Software u. Interface 
Kühlventilator 220V anschlußfertig 


Disketten: 

No-Name ID IDer-Pack 

No-Name 2D (Wendedisk) 10er-Pack 
Panasonic MD1D I0er-Pack 
NASHUA MDID I0er-Pack 
Diskettenbox DX85 

Box für 85-100 Disketten m. Schloß 
Diskettenlocher Normalaust. 
Diskettenlocher Ganzmetallaust. 
Aufklebetaschen f. Diskettenhüllen (Für 
Directory-Listings etc.) S0er-Pack 
Rauchglashaube für C64 


JOYSTICKS 


uickshot I 

wickshot Il 

uickshot VIl 

uickshot IX (Microschalter) 
ickgum Ill (Microschalter) 


Preis auf Anfrage 
Preis auf Anfrage 
Preis auf Anfrage 
Preis auf Anfrage 
29,500M 
11,50DM 
12,50D0M 
17,500M 
698,-DM 
819,-DM 
39,50DM 


279.-DM 
29,50DM 


16,90DM 
21,90DM 
29.50DM 
29,50DM 
24,90DM 


11,90DM 
16,90DM 
19,90DM 
44,90DM 
37,0DM 


Elektronische Bauteile 


280 (ZPU 
280 (DART) 
280 (DMA) 
8255 
6264 


Superangebot: 

Widerstände 1/4 Watt 100 Stck-Packung je Wert 1,98DM 
IC-Fassungen Normalfassung 0.02DM/Pin 
Präzision 0,05D0M/Pin 
Textool 28pol. 23.-DM 
Digitaster (REK) 1.10DM 
DIL-Schalter p. Pol 0,40DM 


TTL-Reihe 741LSxxx 


00.01.02.03.04.05..08.10.11.12 
15.20.21 22.26.27 .30.32.37.38.40.51.54.55 


-500M 
-,70DM 
-,90DM 
1,--DM 


1,20DM 


1.30D0M 
1,40DM 
1,50DM 
1,60DM 
1.80DM 


2.--DM 
2.40DM 
1,-DM 


123.195 
85.158.193 194.283. 290.293 


18.190.191.240.241.242.243.244.248 
3.374 3%0.668.669 


CO 4040 


Achtung: Elektronische Bauteile und Disketten sind von Garantie und Umtausch ausgeschlossen. Module und Software sind vom Umtausch ausgeschlossen. Stand 15.03.1986, 


Angebot freibleibend. solange Vorrat reicht. 
Für Druckfehler wird keine Haftung übernommen. 


Nachnahmeversand NN-Spesen 7.50 DM bei Vorkasse 3.-DM. Bei Auslandsbesiellungen oder bei Bestellungen unter 30.-0M Lieferung nur bei Vorkasse auf Kto: 321095-501. Postgireamt Köln [BLZ 370 10050). Info gegen 
Einsendung eines mit - B0DM frankierten und an sich selbst adressierten DIN A5 Rückumschiags. Bestellungen [soweit vorrätig] bis 12.00 Uhr werden am seiben Tag verschickti! 


Vertrieb für Holland: GIMA-Printservice. Tel.077/70937. PB. 186-5900 AD-Venlo 
Vertrieb für Belgien: Second-Software-Service. Diestestraat 133/8, 3000 Leuven 
Vertrieb für Dänemark: D/C Trading. Sondergade 24. 93240 Nibe 

Vertrieb für die Schweiz: Swissware. Gartenstraße 5a, 6331 Hüneberg. = 042-363649 


Achtung!! Besuchen Sie uns auf der Hobbytronik in Dortmund 


WWW ,.HOMECOMPUTERWORLD,COM 


THE FINAL CARTRIDGE° 


Das erste Betriebssystem im Expansionsport für den C 64 


Im Januar ’86 wurde 
Final Cartridge in London 
als Erweiterung des 
Jahres 1985 mit einem 
Oskar ausgezeichnet. 


Das neue Betriebssystem in einer Modulbox 
benötigt keinen Speicherplatz und steht sofort 
nach dem Einschalten zur Verfügung. 


* Floppy-Turbo — Diskettenzugriff beim 
Laden 6mal schneller, beim Speichern Bmal 
schneller 


* Datasetten-Turbo— 10mal schneller, 
auch bei Datenfiles. Normale Commodore- 
Befehle. Kompatibel zu Standard-Turbos. 


* Überlegenes Centronics-Interface 
— Kompatibel zu allen bekannten Centro 
nics-Druckern und Commodore-Programmen 
für diese Drucker. Druckt alle Commodore- 
Grafik- und Steuerzeichen (wichtig für 
Listings). 


* Hardcopy-Funktion — Druckt Text- 
und Grafikbildschirm, auch im Mehrfarbmo- 
dus. Nutzt die gesamte Druckbreite!'!' Auch 
aus Spielen und Zeichen-Programmen wie 
Doodle, Koala Pad etc. Sucht sich automa- 
tisch die richtige Adresse des Bildes. 


* Final Cartridge ist auch als Version für 
die Commodore-Drucker 801 und 803 erhält 
lich 


* 25 KByte extra RAM für Basic-Pro- 
gramme verfügbar — Mit zwei neuen Be- 
fehlen (Memory Read und Memory Write) las- 
sen sich Daten in Blöcken zu je 192 Byte (Ba 
sic-Variable oder Strings) in Maschinenspra 
che-Geschwindigkeit überall in den 64 KByte 
RAM des C 64 verschieber 


* BASIC 4.0 Befehle - Zum Beispiel 
DLOAD. DSAVE. DAPPEND CATALOG Stc 


* BASIC Toolkit © Mıt AUTO RENUM 
(inklusive Sprungädressenı FIND HELP 
OLD et‘ 


Kompatibel zu 98 % aller Programme 


* Programmierte Funktionstasten — 
Run, Load, Save, Catalog, Diskettenbefehle, 
List (entfernt jeden Listschutz). 


* Erweiterte Tastaturfunktionen — Er- 
laubt teilweises Löschen von Zeilen; wartet 
bei Listings; setzt Cursor in die linke untere 
Ecke. POKEs und SYS-Aufrufe in Hexadezi- 
malzahlen. TYP-Befehl läßt ihren Drucker wie 
eine Schreibmaschine arbeiten. 


* Komfortabler Maschinensprache- 
Monitor — Lädt an die wirkliche Starta- 
dresse, Bildschirm-Scrolling auf- und ab- 
wärts, Bankumschaltung ROM/RAM etc. 


* Reset-Taster — Reset-Sprung in das 
Montor-Programm, Reset ohne Programm- 
verlust (OLD), Reset ohne Drucken einer Hi- 
Res-Grafik, Reset aus jedem geschützten 
Programm. 


Ein-/Ausschalter — Wir hoffen, daß Sie 
ihn nie brauchen. 

14 Tage Geld- 
zurück-Garantie bei 
Nichtgefallen. 


12 Monate 
Ersatz-Garantie. 


Und jetzt brandneu für Deutschland: 


FREEZE FRAME 


Freeze Frame ermöglicht einen Pro- 
gramm-Stop an jeder beliebigen Stelle 
eines laufenden PRG'’s. Das PRG. kann 
an dieser Stelle auf Disk oder Tape ab- 
gespeichert oder als Hardcopy ausge- 
druckt werden. Später können Sie es 
ab dieser Stelle laden und weiter lau- 
fen lassen (Spiele mit vielen Levels)! 
Außerdem erhält man auf Wunsch eine 
Komplett-Kopie (Backup) jedes Pro- 
gramms auf Disk oder Tape (neu). 
Kinderleicht — menügesteuert. 


PREIS: ” 
DM 149, — 


Bestellungen für BRD: 
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